Paramstr und ParamCount

[Urba]

Hallo,

erstelle dir doch einfach eine globale Variable

var aChecked : Boolean und wenn der Button geklickt wurde setzt du sie auf true. Zu Beginn eine Abfrage ob schonmal gecheckt wurde.

Delphi-Quellcode:

procedure TForm1.Button1Click...
begin
  if aChecked = False then begin
    //Deine Abfragen
    //
  end;

  aChecked := True;
end;

Gruss
Urba