[ZVSRus]

Как можно прикрутить кнопку пониже выбора пути установки, чтобы можно было переключать путь с "Program Files (x86)" на "Program Files" и наоборот.

Пример

Код:

[Setup]
 AppName=My Application
 AppVersion=1.5
 DefaultDirName={pf}\My Application
 OutputDir=.

[Code**]
var
  Button: TNewButton;
  Flag: Boolean;

procedure HideShow(Sender: TObject);
begin
  if not Flag then begin
    Button.Caption:='x86';
    WizardForm.DirEdit.Text := AddBackslash(ExpandConstant('{pf64}')) + 'My Application';
    Flag:= True;
  end else begin
    Button.Caption:='x64';
    WizardForm.DirEdit.Text := AddBackslash(ExpandConstant('{pf32}')) + 'My Application';
    Flag:= False;
  end;
end;

procedure InitializeWizard();
begin
  Button := TNewButton.Create(WizardForm);
  with Button do
  begin
    Parent := WizardForm.SelectDirPage;
    SetBounds(ScaleX(342),ScaleY(120),ScaleX(75),ScaleY(23));
    Caption := 'x64';
    OnClick := @HideShow
  end;
end;

Но так и не понял логику вопроса.