在Inno Setup中向'wpSelectTasksPage'添加文本

时间:2013-06-17 01:35:13

标签: inno-setup

我喜欢这样的脚本文字的朋友只出现在“wpselectTasks”页面上 将wpSelectDir替换为wpSelectTasks Inno设置编译,但页面上没有任何内容出现“wpselectTasks” 使用wpSelectDir将是正常的。

**(thus appears on the page wpSelectDir)**
var
  avisoLabel: TLabel;
procedure InitializeWizard();
var
  aviso: TLabel;
begin

avisoLabel := TLabel.Create(WizardForm);
avisoLabel.Left := ScaleX(0);
avisoLabel.Top := ScaleY(190)
avisoLabel.Width := ScaleY(185)
avisoLabel.Height := ScaleY(13)
avisoLabel.Parent:= WizardForm.SelectDirPage;
avisoLabel.Transparent:=true;
avisoLabel.Caption := 'OBS: Sem estes programas instalados o jogo não inicia';
//avisoLabel.AutoSize := True;
end;

procedure CurPageChanged(CurPageID: Integer);
begin
avisoLabel.Visible := CurPageID = wpSelectDir;
end;

**(modifying for wpSelectTasks nothing appears)**

var
  avisoLabel: TLabel;
procedure InitializeWizard();
var
aviso: TLabel;
begin

avisoLabel := TLabel.Create(WizardForm);
avisoLabel.Left := ScaleX(0);
avisoLabel.Top := ScaleY(190)
avisoLabel.Width := ScaleY(185)
avisoLabel.Height := ScaleY(13)
avisoLabel.Parent:= WizardForm.SelectTasksPage;
avisoLabel.Transparent:=true;
avisoLabel.Caption := 'OBS: Sem estes programas instalados o jogo não inicia';
//avisoLabel.AutoSize := True;
end;

procedure CurPageChanged(CurPageID: Integer);
begin
avisoLabel.Visible := CurPageID = wpSelectTasks;
end;

0 个答案:

没有答案