如果捕获Button的第一次点击?

Question

请问大虾....
如果捕获Button的第一次点击?

Answer 1

设置一个标志变量就可以了：var first:boolean=True;procedure TForm1.Button1Click(Sender: TObject);
begin
  if first then
    begin
      ShowMessage('第一次点击');
      first:=not first;
    end
  else ShowMessage('不是第一次点击');
end;

Answer 2

绝大多数控件都有flag这个属性，你可以用它来记录您的点击次数

Answer 3

可以用Flag  也可以用Tag；二者的工作方式都是一样的