Paramstr und ParamCount

[Budda]

Hallo,

Ich frage in meinem Programm per

Delphi-Quellcode:

if ParamCount > 0 then

ab ob Parameter übergeben wurden.
Alles gut und schön, wenn das der Fall ist werden die Parameter per Paramstr in Editfelder geschrieben. Gibt es nun eine Möglichkeit die übergebenen Parameter zu löschen. Also nen ParamClear oder so ^^

Hintergurnd ist das die if Abfrage hinter einem Button liegt und nur beim ersten mal klicken durchgeführt werden soll wenn Parameter übergeben wurden. Beim nächsten mal allerdings nicht mehr.
Das funzt so momentan ja nicht da die if Abfrage ja momentan immer durchlaufen wird da halt mit Parametern aufgerufen wurde. Hoffe das war so verständlich ;)

Gruß
Budda

[Luckie]

Nun ja, mehr oder weniger. Zeig mal Code.

[Garby]

Hallo,

du könntest beim Programmstart die Parameter in einem TStrings speichern, und nach dem ersten Auslesen wieder rauslöschein.

[Urba]

Hallo,

erstelle dir doch einfach eine globale Variable

Delphi-Quellcode:

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

[Thunderchild]

Zitat:

Zitat von Urba

Hallo,
erstelle dir doch einfach eine globale Variable

Wenn der Button nix anderes machen soll, kannst Du auch gleich das Tag dieses Buttons verwenden. Das spart eine Variable und das Tag ist ja sowieso da. (Und global ist es quasi auch)

[Budda]

Alles klar, Danke ;)

Die Lösung mit der globalen Variable passt supi.