浏览代码

Tweak TButton -> TNewButton.

Martijn Laan 5 年之前
父节点
当前提交
4bd0639d41
共有 2 个文件被更改,包括 2 次插入2 次删除
  1. 1 1
      Examples/CodeAutomation.iss
  2. 1 1
      Examples/CodeAutomation2.iss

+ 1 - 1
Examples/CodeAutomation.iss

@@ -279,7 +279,7 @@ end;
 
 procedure CreateButton(ALeft, ATop: Integer; ACaption: String; ANotifyEvent: TNotifyEvent);
 begin
-  with TButton.Create(WizardForm) do begin
+  with TNewButton.Create(WizardForm) do begin
     Left := ALeft;
     Top := ATop;
     Width := WizardForm.CancelButton.Width;

+ 1 - 1
Examples/CodeAutomation2.iss

@@ -267,7 +267,7 @@ end;
 
 procedure CreateButton(ALeft, ATop: Integer; ACaption: String; ANotifyEvent: TNotifyEvent);
 begin
-  with TButton.Create(WizardForm) do begin
+  with TNewButton.Create(WizardForm) do begin
     Left := ALeft;
     Top := ATop;
     Width := (WizardForm.CancelButton.Width*3)/2;