Exécution d'applications Delphi avec des paramètres

Bien que cela soit beaucoup plus courant à l'époque du DOS, les systèmes d'exploitation modernes vous permettent également d'exécuter des paramètres de ligne de commande sur une application afin que vous puissiez spécifier ce que l'application doit faire..

Il en va de même pour votre application Delphi, que ce soit pour une application console ou une avec une interface graphique. Vous pouvez passer un paramètre à partir de l'invite de commandes dans Windows ou de l'environnement de développement dans Delphi, sous le Exécuter> Paramètres option de menu.

Pour ce didacticiel, nous utiliserons la boîte de dialogue des paramètres pour passer des arguments de ligne de commande à une application afin que ce soit comme si nous l'exécutions à partir de l'Explorateur Windows.

ParamCount et ParamStr ()

le ParamCount renvoie le nombre de paramètres transmis au programme sur la ligne de commande, et ParamStr renvoie un paramètre spécifié à partir de la ligne de commande.

le OnActivate le gestionnaire d'événements du formulaire principal est généralement celui où les paramètres sont disponibles. Lorsque l'application est en cours d'exécution, c'est là qu'ils peuvent être récupérés.

Notez que dans un programme, le CmdLine La variable contient une chaîne avec des arguments de ligne de commande spécifiés au démarrage de l'application. Vous pouvez utiliser CmdLine pour accéder à toute la chaîne de paramètres passée à une application.

Exemple d'application

Démarrez un nouveau projet et placez un Bouton composant sur Forme. Dans le bouton Sur clic gestionnaire d'événements, écrivez le code suivant:

 procédure TForm1.Button1Click (expéditeur: TObject);

commencer

 ShowMessage (ParamStr (0));

 fin;

Lorsque vous exécutez le programme et cliquez sur le bouton, une boîte de message s'affiche avec le chemin d'accès et le nom de fichier du programme en cours d'exécution. Tu peux voir ça ParamStr "fonctionne" même si vous n'avez transmis aucun paramètre à l'application; cela est dû au fait que la valeur de tableau 0 stocke le nom de fichier de l'application exécutable, y compris les informations de chemin.

Choisir Paramètres du Courir menu, puis ajoutez Programmation Delphi à la liste déroulante.

Remarque: N'oubliez pas que lorsque vous transmettez des paramètres à votre application, séparez-les avec des espaces ou des tabulations. Utilisez des guillemets doubles pour encapsuler plusieurs mots en un seul paramètre, comme lorsque vous utilisez des noms de fichiers longs contenant des espaces.

L'étape suivante consiste à parcourir les paramètres en utilisant ParamCount () pour obtenir la valeur des paramètres en utilisant ParamStr (i).

Remplacez le gestionnaire d'événements OnClick du bouton par:

 procédure TForm1.Button1Click (expéditeur: TObject);

var

 j: entier;

 commencer pour j: = 1 à ParamCount faire

 ShowMessage (ParamStr (j));

 fin;

Lorsque vous exécutez le programme et cliquez sur le bouton, un message apparaît qui indique "Delphi" (premier paramètre) et "Programmation" (deuxième paramètre).