Посчитать количество нажатий кнопки — Delphi(Делфи)

var
  x: Integer = 0;
.. .

  procedure TForm1.Button1Click(Sender: TObject); // это сам оброботчик :)

begin

  if x <= 100 then
    Inc(x);

end;