Einfache Frage zu einer Schleife

[malo]

Zitat von toms:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
const
{$j+} bClicked: Boolean = False;{$j-}
begin
  if bClicked then
   ShowMessage('Du hast schon geklickt')
  else
   bClicked := True;
end;

So gehts nicht, da man Konstanten nicht ändern kann

@Steve: ich dachte, die Variable wird im ganzen Event beibehalten (also auch beim 2. und 3. mal aufrufen)