[nik1967]

в родном прогрессбаре поменять цвет нельзя. »

Ну почему же, например:

Код:

[_Code]
function SetWindowTheme(hwnd: HWND; pszSubAppName: pchar; pszSubIdList: pchar): Longint; external 'SetWindowTheme@uxtheme.dll stdcall delayload';
 
Procedure InitializeWizard();
begin
try
SetWindowTheme(wizardform.progressgauge.Handle, ' ', ' ');
except
end
end;
 
procedure CurPageChanged(CurPageID: Integer);
begin
if CurPageID=wpSelectDir then
SendMessage(wizardform.progressgauge.Handle, $0409, 0, clBlack);
end;

Или вот с этим побаловаться:

Код:

TNewProgressBarState = (npbsNormal, npbsError, npbsPaused);