Einfache Frage zu einer Schleife

[Aenogym]

hi,

ist wirklich ganz einfach
du musst nur eine variable deklarieren, die speichert, ob schon geklickt wurde. möglichst nicht global, das thema hatten wir hier ja schon oft.

also:

Delphi-Quellcode:

//uses usw.
type
  TForm1 = class(TForm)
    //...
  private
    gedrueckt: boolean;
  end;

//...

procedure TForm1.FormCreate(Sender: TObject);
begin
  gedrueckt := false;   //bin mir jetzt nicht sicher, ob die variable automatisch false ist
end;

procedure TForm1.Button1Click(Sender: TOJbect);
begin
  if gedrueckt then
    showmessage('Du hast schon gedrückt')
  else
    //dein code
end;

Aenogym