【code】段调用【message】段的方法 调用常量
比如 欢迎界面上的文字 WizardForm.WelcomeLabel1.Caption
1、在 WizardForm窗体上创建控件
procedure Button2OnClick(Sender: TObject);//这个过程要放在创建事件函数前面
begin
//执行代码
end;
procedure xxxx(); // 创建控件的过程
begin
Button2.OnClick := @Button2OnClick;
end
procedure ButtonOnClick(Sender: TObject);
begin
ShowMessage( '显示' );
end;
procedure CreateTheWizardPages;
var
Page: TWizardPage;
Button: TNewButton;
begin
Page := CreateCustomPage(wpWelcome, 'Custom wizard page controls', 'TButton and others');
Button := TNewButton.Create(Page);
Button.Width := ScaleX(75);
Button.Height := ScaleY(23);
Button.Caption := '测试按钮';
Bu