Obwohl es in den Tagen von DOS viel häufiger war, können Sie mit modernen Betriebssystemen auch Befehlszeilenparameter für eine Anwendung ausführen, um anzugeben, was die Anwendung tun soll.
Das gleiche gilt für Ihre Delphi Anwendung, ob es für eine sein Konsolenanwendung oder eine mit einer GUI. Sie können einen Parameter über die Eingabeaufforderung in Windows oder über die Entwicklungsumgebung in Delphi unter übergeben Ausführen> Parameter Menüoption.
In diesem Tutorial verwenden wir das Dialogfeld "Parameter", um Befehlszeilenargumente an eine Anwendung zu übergeben, sodass es so aussieht, als würden wir sie über den Windows Explorer ausführen.
ParamCount und ParamStr ()
Das ParamCount Die Funktion gibt die Anzahl der Parameter zurück, die in der Befehlszeile an das Programm übergeben wurden, und ParamStr Gibt einen angegebenen Parameter über die Befehlszeile zurück.
Das OnActivate In der Ereignisbehandlungsroutine des Hauptformulars sind normalerweise die Parameter verfügbar. Wenn die Anwendung ausgeführt wird, können sie dort abgerufen werden.
Beachten Sie, dass in einem Programm die CmdLine Die Variable enthält eine Zeichenfolge mit Befehlszeilenargumenten, die beim Start der Anwendung angegeben wurden. Sie können verwenden CmdLine um auf die gesamte an eine Anwendung übergebene Parameterzeichenfolge zuzugreifen.
Beispielanwendung
Starten Sie ein neues Projekt und platzieren Sie a Taste Komponente ein Bilden. In den Knöpfen OnClick Event-Handler, schreiben Sie den folgenden Code:
Verfahren TForm1.Button1Click (Absender: TObject);
Start
ShowMessage (ParamStr (0));
Ende;
Wenn Sie das Programm ausführen und auf die Schaltfläche klicken, wird ein Meldungsfeld mit dem Pfad und dem Dateinamen des ausgeführten Programms angezeigt. Sie können sehen, dass ParamStr "funktioniert", auch wenn Sie keine Parameter an die Anwendung übergeben haben; Dies liegt daran, dass der Array-Wert 0 den Dateinamen der ausführbaren Anwendung einschließlich der Pfadinformationen speichert.
Wählen Parameter von dem Lauf Menü und dann hinzufügen Delphi-Programmierung zur Dropdown-Liste.
Hinweis: Denken Sie daran, dass Sie Parameter, die Sie an Ihre Anwendung übergeben, durch Leerzeichen oder Tabulatoren trennen. Verwenden Sie doppelte Anführungszeichen, um mehrere Wörter als einen Parameter zu umschließen, z. B. wenn Sie lange Dateinamen verwenden, die Leerzeichen enthalten.
Der nächste Schritt besteht darin, die Parameter mit zu durchlaufen ParamCount () um den Wert der Parameter mit zu erhalten ParamStr (i).
Ändern Sie den OnClick-Ereignishandler der Schaltfläche wie folgt:
Verfahren TForm1.Button1Click (Absender: TObject);
var
j: ganze Zahl;
beginfor j: = 1 zu ParamCount tun
ShowMessage (ParamStr (j));
Ende;
Wenn Sie das Programm ausführen und auf die Schaltfläche klicken, wird die Meldung "Delphi" (erster Parameter) und "Programmierung" (zweiter Parameter) angezeigt.