请问如何让程序在某处暂停(50分)

  • 主题发起人 主题发起人 lucky.gong
  • 开始时间 开始时间
L

lucky.gong

Unregistered / Unconfirmed
GUEST, unregistred user!
我在写一个程序,里面有些代码用来判断EDIT里内容不能为空.我想实现,第一个EDIT内容为空,程序暂停,必需输入内容后.才可以进入第二个EDIT输入内容....,也就是不会让代码在出错的情况依次序执行下去.我是菜鸟,请各位高手帮忙.
 
if Edit1.Text = '' then
begin
ShowMessage('不能为空');
Exit; //这句话就是实现这个目的的.
end;
 
楼主是不是要问怎么设置断点?
 
在TEdit 的OnExit方法里面加入如下内容
if Trim(Edit1.Text) = '' then
begin
ShowMessage('不能为空');
Edit1.setFocus;
Exit;
end;
这样的话必须操作员需要在Edit1里面输入东西才能离开
 
这样吧:
if trim(Edit1.Text) = '' then
begin
ShowMessage('不能为空');
Edit1.SetFouce;
Exit;
end;
 
谢谢四位楼上朋友们.加一句EXIT即可.回答最好的是yanshi1980.再次感谢各位帮忙
 
后退
顶部