Variable Delphi dans une ligne de commande

Bonjour à tous!

J'ais un nom de fichier que je sélectionne dans la forme et que je place dans une variable. J'aimerais savoir s'il est possible d'effectuer une commande DOS avec Shellexecute et cette variable

Par exemple au lieu de ça: ShellExecute(0, nil, 'cmd.exe', 'del Alice.txt', nil, SW_SHOW);

J'aimerais avoir ça:

TOTO := Alice.txt;
ShellExecute(0, nil, 'cmd.exe', 'del TOTO', nil, SW_SHOW);


Merci

Citation:

---

Envoyé par Chemmister

Bonjour à tous!

J'ais un nom de fichier que je sélectionne dans la forme et que je place dans une variable. J'aimerais savoir s'il est possible d'effectuer une commande DOS avec Shellexecute et cette variable

Par exemple au lieu de ça: ShellExecute(0, nil, 'cmd.exe', 'del Alice.txt', nil, SW_SHOW);

J'aimerais avoir ça:

TOTO := Alice.txt;
ShellExecute(0, nil, 'cmd.exe', 'del TOTO', nil, SW_SHOW);


Merci

---

Code:

---

1 2 3 4 5 6 7

var TOTO: string; begin TOTO := 'Alice.txt'; ShellExecute(0, nil, 'cmd.exe', PChar('del ' + TOTO), nil, SW_SHOW); end;

---

ça promet :)

D'ailleurs il faut ajouter /c au début de la chaîne qui contient la commande.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

program ShellExecute1;   uses ShellAPI, Windows;   var nf: string;   begin nf := 'ShellExecute1.~dpr'; ShellExecute(0, 'open', 'cmd.exe', PChar('/c del ' + nf), nil, SW_SHOW); end.

---