Chociaż w czasach DOS było to znacznie bardziej powszechne, nowoczesne systemy operacyjne pozwalają również uruchamiać parametry wiersza poleceń dla aplikacji, aby można było określić, co powinna zrobić aplikacja.
To samo dotyczy twojego Delfy aplikacji, czy to dla Aplikacja konsoli lub jeden z GUI. Możesz przekazać parametr z wiersza polecenia w systemie Windows lub ze środowiska programistycznego w Delphi w obszarze Uruchom> Parametry opcja menu.
W tym samouczku użyjemy okna dialogowego parametrów, aby przekazać argumenty wiersza polecenia do aplikacji, aby działało to tak, jakbyśmy uruchamiali go z Eksploratora Windows.
ParamCount i ParamStr ()
The ParamCount funkcja zwraca liczbę parametrów przekazanych do programu w wierszu poleceń, oraz ParamStr zwraca określony parametr z wiersza poleceń.
The OnActivate moduł obsługi zdarzeń formularza głównego jest zwykle tam, gdzie parametry są dostępne. Gdy aplikacja jest uruchomiona, można ją tam pobrać.
Zauważ, że w programie CmdLine zmienna zawiera ciąg znaków z argumentami wiersza poleceń określonymi podczas uruchamiania aplikacji. Możesz użyć
CmdLine aby uzyskać dostęp do całego ciągu parametrów przekazanego do aplikacji.Przykładowa aplikacja
Rozpocznij nowy projekt i umieść Przycisk składnik włączony Formularz. W przyciskach Na kliknięcie moduł obsługi zdarzeń, napisz następujący kod:
procedura TForm1.Button1Click (Sender: TObject);
zaczynać
ShowMessage (ParamStr (0));
koniec;
Po uruchomieniu programu i kliknięciu przycisku pojawi się okno komunikatu ze ścieżką i nazwą pliku wykonywanego programu. Możesz to zobaczyć ParamStr „działa”, nawet jeśli nie przekazano żadnych parametrów do aplikacji; dzieje się tak, ponieważ wartość tablicy 0 przechowuje nazwę pliku aplikacji wykonywalnej, w tym informacje o ścieżce.
Wybierać Parametry z Biegać menu, a następnie dodaj Programowanie Delphi do listy rozwijanej.
Uwaga: Pamiętaj, że kiedy przekazujesz parametry do swojej aplikacji, oddziel je spacjami lub tabulatorami. Użyj podwójnych cudzysłowów, aby zawinąć wiele słów jako jeden parametr, na przykład w przypadku długich nazw plików zawierających spacje.
Następnym krokiem jest przejście przez parametry za pomocą ParamCount () aby uzyskać wartość parametrów za pomocą ParamStr (i).
Zmień moduł obsługi zdarzeń OnClick przycisku na:
procedura TForm1.Button1Click (Sender: TObject);
var
j: liczba całkowita;
beginfor j: = 1 do ParamCount robić
ShowMessage (ParamStr (j));
koniec;
Po uruchomieniu programu i kliknięciu przycisku pojawia się komunikat „Delphi” (pierwszy parametr) i „Programowanie” (drugi parametr).