[nik1967]

leshcat, ну, как бы это не мой косяк. Работает всё отлично. Да и азы это. ничего сложного.

читать дальше »

Код:

[Setup]
AppName=Приложение
AppVerName=Приложение
DefaultDirName={pf}\Приложение
DirExistsWarning=no

[Languages]
Name: rus; MessagesFile: compiler:Languages\Russian.isl

[_Code]
var
  AboutButton, CancelButton: TButton;

procedure InitializeWizard;
begin
    CancelButton:= WizardForm.CancelButton;
    AboutButton:= TButton.Create(WizardForm);
  with AboutButton do begin
    SetBounds(WizardForm.ClientWidth-CancelButton.Left-CancelButton.Width,CancelButton.Top,CancelButton.Width,CancelButton.Height);
    Caption:= '&About...';
    //OnClick:= @AboutButtonOnClick;
    Parent:= WizardForm;
  end;
end;

Procedure CurPageChanged(CurPageID: Integer);
Begin
  if CurPageID = 1 then
    AboutButton.Show
  else
    AboutButton.Hide;
end;

Скорее всего переменная описана в какой то конкретной процедуре. Вынеси описание под [_Code]