Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для Dodakaedr

Ветеран


Сообщения: 863
Благодарности: 262

Профиль | Отправить PM | Цитировать


Цитата МИШАНЧИК:
Можно как-то сделать чтоб при установке в WelcomeLabel дописывалась разрядность устанавливаемого приложения »
Можно, исправляйте под свои нужды
Скрытый текст
Код: Выделить весь код
[setup]
appname=App
appversion=1.1
UninstallDisplayName={code:GetUnName}
DefaultDirName={sd}\Apps

[CustomMessages]
Welcx32=Установка {#SetupSetting("AppName")} x32
Welcx64=Установка {#SetupSetting("AppName")} x64
UnName32=Удалить {#SetupSetting("AppName")} x32
UnName64=Удалить {#SetupSetting("AppName")} x64

[Code]
function GetUnName(uname: string): string;
begin
  if IsWin64 then uname := CustomMessage('UnName64') else uname := CustomMessage('UnName32');
  Result := uname;
end;

procedure InitializeWizard();
begin
  if IsWin64 then
    begin
      WizardForm.WelcomeLabel1.Caption := CustomMessage('welcx64');
      WizardForm.Caption := WizardForm.WelcomeLabel1.Caption;
    end
    else
    begin
      WizardForm.WelcomeLabel1.Caption := CustomMessage('welcx32');
      WizardForm.Caption := WizardForm.WelcomeLabel1.Caption;
    end;
end;

-------
Inno Setup 5 Ultra Unicode

Это сообщение посчитали полезным следующие участники:

Отправлено: 22:04, 10-11-2015 | #1058