Цитата murlakatamenka:
в родном прогрессбаре поменять цвет нельзя. »
|
Ну почему же, например:
Код:
[_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);