Aj keď to bolo v dňoch DOS omnoho bežnejšie, moderné operačné systémy vám umožňujú spúšťať parametre príkazového riadku aj proti aplikácii, aby ste mohli určiť, čo by mala aplikácia robiť.
To isté platí pre vaše Delphi žiadosť, či už ide o a konzolová aplikácia alebo jeden s grafickým používateľským rozhraním. Parameter môžete zadať z príkazového riadka vo Windows alebo z vývojového prostredia v Delphi pod Spustiť> Parametre možnosť ponuky.
V tomto tutoriále použijeme dialógové okno parametrov na odovzdanie argumentov príkazového riadka do aplikácie tak, aby to bolo, akoby sme spustili program Prieskumník systému Windows.
ParamCount a ParamStr ()
ParamCount funkcia vráti počet parametrov odovzdaných programu na príkazovom riadku a ParamStr vráti zadaný parameter z príkazového riadku.
OnActivate obsluha udalosti hlavného formulára je zvyčajne tam, kde sú parametre k dispozícii. Keď je aplikácia spustená, je možné ich získať.
Všimnite si, že v programe CmdLine Premenná obsahuje reťazec s argumentmi príkazového riadka zadanými pri spustení aplikácie. Môžeš použiť
CmdLine na prístup k celému reťazcu parametrov odovzdanému do aplikácie.Vzorová aplikácia
Spustite nový projekt a umiestnite a gombík komponent na formulár. Na tlačidle Po kliknutí obsluha udalosti, napíšte nasledujúci kód:
procedúra TForm1.Button1Click (Sender: TObject);
začať
ShowMessage (ParamStr (0));
koniec;
Keď spustíte program a kliknete na tlačidlo, objaví sa okno so správou s názvom cesty a súboru vykonávajúceho programu. Môžete to vidieť ParamStr „funguje“, aj keď ste do aplikácie nepostúpili žiadne parametre; je to preto, lebo hodnota poľa 0 ukladá názov súboru spustiteľnej aplikácie vrátane informácií o ceste.
zvoliť parametre z beh a potom pridajte Programovanie Delphi do rozbaľovacieho zoznamu.
Poznámka: Nezabudnite, že keď odovzdáte parametre svojej aplikácii, oddeľte ich medzerami alebo kartami. Použite dvojité úvodzovky na zalomenie viacerých slov ako jedného parametra, napríklad pri použití dlhých názvov súborov, ktoré obsahujú medzery.
Ďalším krokom je opakovanie parametrov pomocou ParamCount () na získanie hodnoty parametrov pomocou ParamStr (i).
Zmeňte obslužný program udalosti OnClick na toto:
procedúra TForm1.Button1Click (Sender: TObject);
var
j: celé číslo;
beginfor j: = 1 na ParamCount robiť
ShowMessage (ParamStr (j));
koniec;
Keď spustíte program a kliknete na tlačidlo, objaví sa správa, ktorá znie „Delphi“ (prvý parameter) a „Programovanie“ (druhý parameter).