Z
zhouyujie238
Unregistered / Unconfirmed
GUEST, unregistred user!
一个botton按钮，botton1.click()，有方法判断这个botton1.click()里面是否写了代码吗？比如要实现这样一个效果：如果按钮里面没有写代码，则隐藏掉。
procedure TForm1.Button2Click(Sender: TObject)
begin
if Button1.OnClick = nil then //这行代码编译不过，有什么方法来实现？
begin
Button1.Visible := false
end ;
end;
procedure TForm1.Button2Click(Sender: TObject)
begin
if Button1.OnClick = nil then //这行代码编译不过，有什么方法来实现？
begin
Button1.Visible := false
end ;
end;
]