Discussion :

[jacco]

Bonsoir tout le monde,

Il se fait un peu tard mais je recherche un peu d'aide pour le problème suivant :

Je dois lancer n fois le même exécutable et à chaque exécution l'exécutable se voit attribuer des paramètres différents.
Pour l'instant je répète 80 fois la ligne de commande avec les paramètres appropriés, ce qui n'est pas optimal.

J'ai essayé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Parameters : Array [1..80] of string;
 
ShellExecute(0, 'open', 'C:\Users\Yaacov\Desktop\TEST\TEST_DATE', @Parameters[I], nil, 1)

mais je n'arrive pas à récuperer les valeurs appropriées avec paramstr(1), paramstr(2), paramstr(3) etc dans le Pgm appelé.

Idéalement j'aurais voulu faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

For  I:= 1 to 80 do ShellExecute(0, 'open', 'C:\Users\Yaacov\Desktop\TEST\TEST_DATE', @Parameters[I], nil, 1)

Merci pour vos suggestions et conseils.
Bonne soirée.

[Guesset]

Bonsoir,

Deux instructions : ParamCount et ParamStr(i). Je conseille d'aller voir la doc en ligne de Lazarus ne serait-ce que pour les exemples pour divers systèmes d'exploitation. L'usage ne sert pas qu'aux programme en ligne de commande. Si on fait un glisser déposer sur un programme ou son raccourci, ce qui est déposé est passé par les même arguments.

Exemple de création d'une liste de chiers passés en argument.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
strs := TStringList.Create;
for i := 1 to ParamCount do if FileExists(ParamStr(i)) then strs.Add(ParamStr(i));

ParamStr(0) est le premier argument c'est à dire le nom du programme exécuté.

Salutations

[Andnotor]

Le paramètre est incorrect.

Une variable chaîne est un pointeur, un tableau de chaînes est donc un tableau de pointeurs. En utilisant @Parameters[I] tu lui passes l'adresse du pointeur de la chaîne et non l'adresse du premier caractère de la chaîne.

Lorsqu'on comprend que @Parameters[I] retourne un pointeur, on pourrait compléter la déclaration et dire je veux l'adresse du premier élément @Parameters[I][1] mais ce n'est pas très intuitif ! A la place, donnons simplement à ShellExecute le type de paramètre qu'elle attend PChar(Parameters[I]). PChar se charge pour nous de toutes ces redirections

[jacco]

Le paramètre est incorrect.

Une variable chaîne est un pointeur, un tableau de chaînes est donc un tableau de pointeurs. En utilisant @Parameters[I] tu lui passes l'adresse du pointeur de la chaîne et non l'adresse du premier caractère de la chaîne.

Lorsqu'on comprend que @Parameters[I] retourne un pointeur, on pourrait compléter la déclaration et dire je veux l'adresse du premier élément @Parameters[I][1] mais ce n'est pas très intuitif ! A la place, donnons simplement à ShellExecute le type de paramètre qu'elle attend PChar(Parameters[I]). PChar se charge pour nous de toutes ces redirections

Super ca marche Grand Merci Andnotor pour la réponse fournie de surcroit pendant un Dimanche
et merci également a Guesset pour sa réponse écrite a une heure tardive.

PS:
J'ai un dernier petit problème.
Chaque exécution du programme appelé crée son propre fichier de résultats. Je voudrais Concaténer tous les fichiers de résultats à l'aide d'une instruction dans le programme appelant.
Pour se faire je veux être sûr que toutes les n exécutions soient terminées.
Quelle serait l'instruction la plus appropriée (J'ai noté la fonction WaitForSingleObject(processInfo.hProcess, INFINITE)) ?
Merci et bon dimanche.

[Roland Chastain]

Bonjour ! Concernant votre seconde question, peut-être l'exemple ci-joint vous sera-t-il utile. Je l'ai trouvé sur ce site, où il y a pas mal de choses intéressantes : { https://assarbad.net }

[jacco]

Bonjour ! Concernant votre seconde question, peut-être l'exemple ci-joint vous sera-t-il utile. Je l'ai trouvé sur ce site, où il y a pas mal de choses intéressantes : { https://assarbad.net }

Bonjour Roland,


Merci pour la réponse je vais regarder cela de plus près.
Salutations