Question

delphi if (Assigned(Button1.onclick) or key=#13) then.....?

这么写不对 一个STRIng 一个BOOLEAN 应该怎么写才好呢?

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励30（财富值+成长值）

Answer 1

设定一个全局变量sf_click:boolean; ，在窗体create 时候给它赋值 sf_click:=false;
在Button1click(send:Tobject);里面写上 sf_click:=true;
条件语句就可以这样写
if sf_click or key=#13 then
begin
.....
sf_click:=false;
end;