Question

delphi中的按钮空间,如何实现开关功能

当按第一下按钮时,执行第一件事,当按下第二次时,又执行第二件事,当按下第3次是有执行第一件事,第4次执行第2件事,如此循环.大侠门帮帮忙啊!
谢谢啊!不过标题是一样的怎么办啊!

Answer 1

在按钮上加个标题就行了,如果标题是1就做那种事,否则做别的事,我给个思路
你可以先默认一个标题,然后点击一下时改变标题.
button.caption=2,q然后根据标题就可以做出相应的事件了

Answer 2

可以设置一个全局变量,用来保存是第几次点击按钮.(假设为 g_num)
在button下判断.
g_num := g_num +1;
if g_num mod 2=0 then//被2整除
执行第二个事件
else
执行第一个事件