将Inno Setup Pascal Script代码拆分为子函数/子程序会影响性能吗?

时间:2017-06-13 18:01:04

标签: inno-setup pascal pascalscript

我正在InitializedWizard部分直接创建所有页面(他们没有创建示例的顺序; Page2, Page5, Page1),如

procedure InitializeWizard;
var
  Text : TLabel;
Begin
  Page2 := CreateCustomPage(Page1.ID, '', '');
  Text := TLabel.Create(page2);
  Text.Left := ScaleX(0);
  Text.Top := ScaleY(35);
  Text.Caption := ''; 
  Text.Parent:= Page2.Surface;

  Page5 := CreateCustomPage(Page4.ID, '', '');
  Text := TLabel.Create(Page5);
  Text.Left := ScaleX(0);
  Text.Top := ScaleY(35);
  Text.Caption := ''; 
  Text.Parent := Page5.Surface;
End;

如果我在分隔的procedures上创建网页,然后在InitializeWizard中调用它们,我会有所不同吗?

procedure CreatePage1;
var
  Text : TLabel;
begin
  Page2:= CreateCustomPage(Page1.ID, '', '');
  Text := TLabel.Create(Page2);
  Text.Left := ScaleX(0);
  Text.Top := ScaleY(35);
  Text.Caption := 'Tickets Printer'; 
  Text.Parent := Page2.Surface;
end;  

procedure InitializeWizard;
begin
  CreatePage1();
  CreatePage2();
  CreatePage3();
end;

1 个答案:

答案 0 :(得分:1)

之间没有实际的性能差异:

procedure Master;
begin
  Statement1;
  Statement2;
end;

procedure Child1;
begin
  Statement1;
end;

procedure Child2;
begin
  Statement2;
end;

procedure Master;
begin
  Child1;
  Child2;
end;

如果那样,你问的是什么。