Delphi-applicaties uitvoeren met parameters
Share
Hoewel het veel gebruikelijker was in de dagen van DOS, kun je met moderne besturingssystemen ook opdrachtregelparameters uitvoeren voor een toepassing, zodat je kunt opgeven wat de toepassing moet doen.
Hetzelfde geldt voor uw Delphi-toepassing, of het nu een consoletoepassing is of een toepassing met een GUI. U kunt een parameter doorgeven vanuit de opdrachtprompt in Windows of vanuit de ontwikkelomgeving in Delphi, onder de Uitvoeren> Parameters menu optie.
Voor deze zelfstudie gebruiken we het dialoogvenster Parameters om opdrachtregelargumenten door te geven aan een toepassing zodat het lijkt alsof we deze uitvoeren vanuit Windows Verkenner.
ParamCount en ParamStr ()
De ParamCount functie retourneert het aantal parameters dat is doorgegeven aan het programma op de opdrachtregel, en ParamStr retourneert een opgegeven parameter vanaf de opdrachtregel.
De OnActivate event handler van het hoofdformulier is meestal waar de parameters beschikbaar zijn. Wanneer de toepassing actief is, kunnen ze worden opgehaald.
Merk op dat in een programma de CmdLine variabele bevat een tekenreeks met opdrachtregelargumenten die zijn opgegeven toen de toepassing werd gestart. Je kunt gebruiken CmdLine om toegang te krijgen tot de volledige parameterstring die aan een toepassing is doorgegeven.
Voorbeeldtoepassing
Start een nieuw project en plaats een Knop component op Het formulier. In de knop's Bij klikken gebeurtenishandler, schrijf de volgende code:
procedure TForm1.Button1Click (Sender: TObject);
beginnen
ShowMessage (ParamStr (0));
einde;
Wanneer u het programma uitvoert en op de knop klikt, verschijnt een berichtvenster met het pad en de bestandsnaam van het uitvoerende programma. Je kan dat zien ParamStr "werkt" zelfs als u geen parameters aan de toepassing hebt doorgegeven; dit komt omdat de matrixwaarde 0 de bestandsnaam van de uitvoerbare toepassing opslaat, inclusief padinformatie.
Kiezen parameters van de Rennen menu en vervolgens toevoegen Delphi-programmering naar de vervolgkeuzelijst.
Notitie: Onthoud dat wanneer u parameters doorgeeft aan uw toepassing, deze gescheiden moeten worden met spaties of tabbladen. Gebruik dubbele aanhalingstekens om meerdere woorden als één parameter te gebruiken, zoals bij het gebruik van lange bestandsnamen die spaties bevatten.
De volgende stap is het doorlopen van de parameters met behulp van ParamCount () om de waarde van de parameters te krijgen met ParamStr (i).
Wijzig de OnClick-gebeurtenishandler van de knop in deze:
procedure TForm1.Button1Click (Sender: TObject);
var
j: integer;
beginfor j: = 1 naar ParamCount Doen
ShowMessage (ParamStr (j));
einde;
Wanneer u het programma uitvoert en op de knop klikt, verschijnt een bericht met de tekst "Delphi" (eerste parameter) en "Programmering" (tweede parameter).
