Einfache Frage zu einer Schleife

[Steve]

Zitat von malo:

Erstell doch eine Variable in deinem OnClick-Ereignes, die beim OnClick auf true gesetzt wird , also so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var KLick: boolean;
begin
 if Klick = true then
   ShowMessage('schon geklickt!');
 Klick := true;
end;

Wenn die Variable lokal ist, geht die Änderung verloren.

Gruß
Stephan