可以设一变量,如flag为boolean初值为false;
当按钮按下时:
flag:=true;
if flag then
begin
...
end
else
begin
...
end;
当按钮按下时:
flag:=true;
if flag then
begin
...
end
else
begin
...
end;
解决方案 »
- delphi7下开发的小工具到XE2下不能编译了,提供源码,帮忙看一下。
- 新手请教大侠们:使用SPCOMM控件中发送数据的问题。。。^_^
- 欢迎加入 群18123461一起讨论BCB,delphi
- WebBrowser的问题
- FastReport的折行时行间距太拥挤,能不能设置行的间距??
- 请大虾们看看:这是为什么?
- Delphi dbExpress
- 菜鸟的菜鸟问题!非常简单的-------在线等待!!!!!!先答者有分,绝不食言
- adoconnecttion中的login问题
- 如何让DBGridEh的某个字段根据一定的条件来显示数据?
- 如何选中richedit中的内容并打印出来?
- 大家都是把TQUERY等放到DATAMODULE里的吗,但是。。。
else
begin
...//这一部分永远不会执行!!!!!!!
end;
在窗口onshow中设置
flag:=true;
然后在按钮事件中
if flag then
begin
....
flag:=false;
end
else
begin
....
end;
if botton.tag = 0 then
begin
第一次按下
botton.tag = 1
end
else
第二次按下
tag确实很有用的,在代码重用等方面有很好的效果
用.tag属性就好