executer un exe grace à son appli

Question

Bonjours a tous, j'éssaye d'executer un .exe avec mon prog, jattilise pour sa un  TCustomFileRun et voici mon code:

procedure TForm1.Button1Click(Sender: TObject);
var
da: TCustomFileRun;
begin
da.FileName := ('C:\WINDOWS\NOTEPAD.EXE);
da.Hint := 'open';
end;

voila quand je fait ça, ça me met une belle erreur et j'arrive pas a trouver pour quoi. On ma conseiller d'utiliser Shellexecute mais jai trouver aucune aide sous delphi6 et je galére comme un shtroumf!!!

si vous avez une réponde pour lun ou pour lautre c tro fort  :) 
Merci à tous

jmp77 · Answer

salut,

Voici comment j'utilise la commande shellexecute :
Shellexecute(Application.Handle,nil,PChar(Chemin de l'exe),nil,nil,SW_SHOW);

A+,
JMP.

cs_GawiNDX · Answer

Salut, 
il y'a aussi une autre solution en utilisant CreateProcess
c'est plus complique mais ça peut te permettre d'attendre l'execution d'un programme avant de continuer dans ton programme
Recherche CreateProcess dans les source depose, c'est comme ça que j'ai découvert cette commande.

GawiNDX

Executer un exe grace à son appli

2 réponses

Votre réponse

Discussions similaires