【文件属性】：
文件名称：Delphi登录界面设计
文件大小：2KB
文件格式：PAS
更新时间：2015-03-21 09:39:48
Delphi界面简单设计
Delphi界面简单设计procedure Tyonghudenglu.BitBtn1Click(Sender: TObject);
var sa:string;
begin
//先判断是否为空;
if Edit1.Text='' then
begin
messagebox(yonghudenglu.Handle,'请输入用户名','警告',mb_ok+mb_iconwarning)
end;
if Edit2.Text='' then
begin
messagebox(yonghudenglu.Handle,'口令不能为空','警告',mb_ok+mb_iconwarning)
end
网友评论
- 设计界面呢，怎么只有代码窗口
- 将就着看 不完整
- 本来对delphi没有基础，不知如何去实现，看了代码后还是对我有很大启发的。
- 所有的FORM都调入了内容，占用空间
- 只有PAS文件，不能用呀，看看代码还可以
- 的确只有unit2.pas
- 只有unit2.pas 不知道怎么用~