Вопрос Цвет Дейнсталятора

[DEAD KING]

Как покрасить зелёную полосу в дейнсталяторе, в красный цвет?

 

[HandyMan]

[_Code]
procedure InitializeUninstallProgressForm();
begin
  UninstallProgressForm.ProgressBar.Style:=npbstMarquee;
end;

 

[audiofeel]

Как покрасить зелёную полосу в дейнсталяторе, в красный цвет?

Нашел у себя как в инсталл менять. На этом наши полномочия -ВСЕ

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;

 

[DEAD KING]

[_Code]
procedure InitializeUninstallProgressForm();
begin
  UninstallProgressForm.ProgressBar.Style:=npbstMarquee;
end;

Не робит

 

[Crachlow]

Не робит

Посмотри. Может так