Question

delphi 一个BUTTON实现两种判断

当我点一下就showmessage 1 再点一下就 showmessage 2
点第三下又变回 showmessage 1
请问怎么做判断？

Answer 1

用BUTTON.tag 变量
if button1.tag=1 then
begin
button1.tag:=2;
showmessage 1
end
else
begin
button1.tag:=1;
showmessage 2
end;

Answer 2

设置个全局变量，点击就改变值。。
如果button有tag就直接用tag吧。。。

Answer 3

比如点一下showmessage 1的同时把BUTTON的CAPTION改成“BUTTON2”，思路就是根据BUTTON的CAPTION来区分操作，明白了吗？点一下的同时改按钮的CAPTION

Answer 4

if button1.caption="一状态" then
begin
button1.caption:="二状态";
showmessage 1
end
else
begin
button1.caption:="一状态";;
showmessage 2
end;