delphi 一个BUTTON实现两种判断

2024-12-17 11:10:48

推荐回答（4个）

回答1：

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

回答2：

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

回答3：

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

回答4：

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

最新问答