本文介绍在“欢迎页面添加文字”的两种方法。
界面预览:
首先可以在[Code]段添加以下代码:
procedure
InitializeWizard();
var
LabelDate:
Tlabel;
begin
WizardForm.WelcomeLabel2.Autosize := true;
LabelDate :=
Tlabel.Create(WizardForm);
LabelDate.Autosize :=
true;
LabelDate.Caption :=
'本程序由祥瑞天下制作'#10#13#10#13'欢迎喜欢学习研究电脑应用的朋友'#10#13#10#13'访问祥瑞天下的Blog:'#10#13#10#13'
http://blog.sina.com.cn/xrsky2009/';
LabelDate.Parent :=
WizardForm.WelcomePage;
LabelDate.Left :=
WizardForm.WelcomeLabel2.Left;
LabelDate.Top :=
WizardForm.WelcomeLabel2.Top +WizardForm.WelcomeLabel2.Height
+80;
end;
第二种方法是脚本中添加以下代码:
[Messages]
ClickNext=单击“下一步”继续,或单击“取消”退出安装程序。%n%n%n%n%n%n%n%n本程序由祥瑞天下制作%n%n欢迎喜欢学习研究电脑应用的朋友%n%n访问祥瑞天下的Blog:%n%n
http://blog.sina.com.cn/xrsky2009/
换行符号说明:
在 MsgBox
中换行符号为 #10#13
在 [Messages]
换行符号为 %n