如何判断按钮被点击过? 点击按钮,调用onclick事件,可是如何判断按钮被点击过哪??谢谢指点 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 这个过程执行就执行了,那么你可以加个变量,当没按过是FALSE,按了变TRUE不就得了 或者用静态变量procedure YouForm.ButtonOnClick(Sender: TObject);const IsClicked:boolean = false;begin if not IsClicked then begin DoClick(); // Click代码 IsClicked := true; end;end;别忘了打开Assignable typed constants选项. !最简单的办法: button的tag默认为0,你可以OnClick一次就Inc(tag),这样还能知道按了几次,也不必额外加变量。 下个关于复制文件的目标目录问题. fastreport 打印 问题 急急急!!! FASTREPORT做的程序发布时用加什么吗? 求:ACCSEE数据库的压缩备份与解压恢复代码,在线。。。。。。 请教一个弱智的问题,大家所说的“二层”“三层”具体是什么意思? 此文件正由另一应用程序或用户使用!这是怎么回事?? 关于COM口的数据通信的问题,各位高手请帮帮忙! 关于INI文件? 关于delphi和sql那里有好的教程? 不能启动运行delphi5.0! 关于 dll 中的资源的调用问题 文件关联
procedure YouForm.ButtonOnClick(Sender: TObject);
const IsClicked:boolean = false;
begin
if not IsClicked then begin
DoClick(); // Click代码
IsClicked := true;
end;
end;
别忘了打开Assignable typed constants选项.
button的tag默认为0,你可以OnClick一次就Inc(tag),这样还能知道按了几次,也不必额外加变量。