1、窗体文件与程序设计
（1）、窗体文件
（2）、代码精彩片断
- procedure TForm1.Button1Click(Sender: TObject);
- begin
- if Label1.Caption='欢迎来到dyli Delphi语言训练基地' then
- //这里Label1.Caption=xx 表示判断条件，即判断label的文本内容
-
- begin
- Label1.Caption:='Welcome to dyli Delphi Tranning base';
- Button1.Caption:='Switch to Chinese';
- end //这里这里有end没有逗号，别上当了
-
- else
- begin
- Label1.Caption:='欢迎来到dyli Delphi语言训练基地';
- Button1.Caption:='切换到英文';
- end;
- end;
本程序只在不断的点击Button1的过程中，实现Lable1上的Caption文本不断的在中文与英文的切换。上面的if语句中，应注意Delphi if语句的格式，并应注意到then关键字后面的begin end 的end是没有逗号的，切记！勿忘！！
2、运行效果
中文界面：
英文界面
