Deși a fost mult mai frecvent în zilele de DOS, sistemele de operare moderne vă permit, de asemenea, să rulați parametrii liniei de comandă împotriva unei aplicații, astfel încât să puteți specifica ce ar trebui să facă aplicația.
Același lucru este valabil și pentru dvs. Delphi cerere, indiferent dacă este pentru un aplicație de consolă sau una cu GUI. Puteți trece un parametru din Prompt Command în Windows sau din mediul de dezvoltare din Delphi, în secțiunea Rulați> Parametri opțiune de meniu.
Pentru acest tutorial, vom folosi caseta de dialog a parametrilor pentru a trece argumentele liniei de comandă la o aplicație, astfel încât să fie ca și cum am fi rulat din Windows Explorer.
ParamCount și ParamStr ()
ParamCount funcția returnează numărul de parametri trecuți la program pe linia de comandă și ParamStr returnează un parametru specificat de la linia de comandă.
OnActivate gestionarea evenimentelor din formularul principal este de obicei acolo unde sunt disponibili parametrii. Când aplicația rulează, este acolo pentru a putea fi preluate.
Rețineți că într-un program, linie_cmd variabilă conține o șir cu argumente de linie de comandă specificate la lansarea aplicației. Poți să folosești linie_cmd pentru a accesa întregul șir de parametri transmis la o aplicație.
Aplicație de probă
Porniți un proiect nou și plasați un Buton componentă pe Formă. În butonul OnClick handler de evenimente, scrieți următorul cod:
procedură TForm1.Button1Click (Expeditor: TObject);
începe
ShowMessage (ParamStr (0));
Sfârșit;
Când rulați programul și faceți clic pe buton, apare o casetă de mesaj cu calea și numele fișierului programului de execuție. Puteți vedea asta ParamStr „funcționează” chiar dacă nu ați trecut niciun parametru în aplicație; acest lucru se datorează faptului că valoarea matrice 0 stochează numele fișierului aplicației executabile, inclusiv informații de cale.
Alege Parametrii de la Alerga apoi adăugați Programare Delphi la lista derulantă.
Notă: Nu uitați că atunci când treceți parametrii la aplicația dvs., separați-i cu spații sau file. Folosiți ghilimele duble pentru a înfășura mai multe cuvinte ca un singur parametru, cum ar fi atunci când utilizați nume de fișiere lungi care conțin spații.
Următorul pas este să parcurgi parametrii folosind ParamCount () pentru a obține valoarea parametrilor folosind ParamStr (i).
Modificați butonul de gestionare a evenimentelor OnClick la acesta:
procedură TForm1.Button1Click (Expeditor: TObject);
var
j: număr întreg;
beginfor j: = 1 la ParamCount do
ShowMessage (ParamStr (j));
Sfârșit;
Când rulați programul și faceți clic pe buton, apare un mesaj care scrie „Delphi” (primul parametru) și „Programare” (al doilea parametru).