Название установщика на панеле задач

[Реалист]

Как сделать чтобы на панеле задач вместо "Установка" было например "Установка Моя программа v1.0"?

 

[Timick]

WinTB (http://krinkels.org/threads/wintb.1952/)

SetTaskBarTitleWinTB('Установка Моя программа')

 

[Реалист]

WinTB (http://krinkels.org/threads/wintb.1952/)

SetTaskBarTitleWinTB('Установка Моя программа')

Не работает на win xp

 

[Timick]

Не работает на win xp

Эмм... Ну и как бы что? Это пережитки прошлого, если вы хотите делать репак на современную игру, смысла в поддержке ХР нет.

 

[Реалист]

Эмм... Ну и как бы что? Это пережитки прошлого, если вы хотите делать репак на современную игру, смысла в поддержке ХР нет.

Я делаю установщик к программе, которая должна работать в том числе и на старых ос

 

[South]

на очень старом инно так работало, по идее и сейчас д.б. так же

function SetWindowText(hWnd: Longint; lpString: PChar): Longint; external 'SetWindowTextA@user32.dll';
function GetWindowLong(hWnd, nIndex: Integer): Longint; external 'GetWindowLongA@user32.dll';

Procedure SetAppTitle(Value: String);
var n: HWND;
begin
  n:=GetWindowLong(MainForm.Handle, -8);
  if n <> 0 then SetWindowText(n, PChar(Value));
end;

procedure InitializeWizard;
begin
  SetAppTitle('NewTitle');
end;

 

[Реалист]

на версии 5.5.8 работает. спасибо