ShellExecute

eric_delphi_man Messages postés 5 Date d'inscription mercredi 9 juin 2004 Statut Membre Dernière intervention 12 juillet 2004 - 16 juin 2004 à 08:54
Hnimsgern Messages postés 48 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 4 mars 2005 - 16 juin 2004 à 19:55
Voici mon programme( Application console) pour lancer automatiquement mon logiciel, et il ne marche pas je ne comprend pas merci de me donner la reponse merci ciao

program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;

function ShellExecute(0, 'OPEN', 'Project2.exe', Nil, Nil, SW_SHOWNORMAL);

begin
end.
A voir également:

1 réponse

Hnimsgern Messages postés 48 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 4 mars 2005
16 juin 2004 à 19:55
Tu devrais avoir les instructions suivantes:

uses ShellApi; etc.... puis
Procedure TForm.Button1_Click(Sender: TObject);
begin
ShellExecute(Handle, 'open', 'Project2.exe', '', '', 1);
end; HN
0
Rejoignez-nous