我想执行一个按钮点击事件时,如果text1.text=空就提示出错,
并不执行下面的代码,界面保持不变,要用户再写一次,这样怎样写啊?
如这样写就得:
if text1.text <> '' then
begin
做野
end
else
begin
showmessage('出错');
end;但我想用:
if text1.text = '' then
begin
showmessage('出错');
exit();
end;做野这样做当为空时就会结束窗口,但我想不结束。点做啊?
并不执行下面的代码,界面保持不变,要用户再写一次,这样怎样写啊?
如这样写就得:
if text1.text <> '' then
begin
做野
end
else
begin
showmessage('出错');
end;但我想用:
if text1.text = '' then
begin
showmessage('出错');
exit();
end;做野这样做当为空时就会结束窗口,但我想不结束。点做啊?
解决方案 »
- 对IE控制的问题,,做技术探讨
- 求实现多行表头的DbGrid及stringGrid控件及代码。。。 请高手帮忙
- 请教如何使用Businessskinform组件,谢谢!
- 有关DBGrid的问题。(如回复激烈,高分送出。)
- 不同服务器登录,如何办?
- 请问:求时间差的方法
- 服务器数据同步?
- reportbuilder如何设计报表,它的几个重要的控件怎么用?(高分相送,急)
- 如何把电子表格中的数据,自动填入另外软件窗口中
- 痴心不改'流合并'!!!
- 新装系统显卡(太阳花鐳2000)驱动找不到了,不知道为什么,网上down的都没有用?急啊!!谁能给点提示啊~~~~~~ SOS
- 以下C++Builder代码如何用Delphi5写?
showmessage('出错');
exit();
end
else begin
do somethings
end;it is right!
判断text1.text是否为空,空就提示出错,不再执行下面的代码了,要用户再写。
不为空就执行代码。