如果Button1.Click = true

Question

Button1: TButton; 
Label2: TLabel;

procedure TForm5.Button1Click(Sender: TObject);
 begin 
 if Button1.Click = True then
      Label2.Caption := 'lol';

基本上我想要的是，当用户点击按钮时，Label2会改变那里写的内容。是的我有Label2。 出现的错误是“ E2008不兼容的类型”......  任何人都可以帮助我吗？

Answer 1

方法Click不是函数，也没有返回值。所以你无法将它与True进行比较。 您的Button1Click是Button1点击事件的事件处理程序。当用户点击Button1中的Button1Click代码执行时。所以你需要像这样写Button1Click：

procedure TForm5.Button1Click(Sender: TObject);
begin 
  Label2.Caption := 'lol';
end;