Discussion :

[EricNO]

Bonjour,

Je travaille sur BCB6 sous XP.

Dans mon appli je voudrai lancer une page WEB. puis pouvoir la fermer.
le handle de process que je recupére aprés un shellexecuteex est NULL.
je ne comprend pas pourquoi.

Code ci joint :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
SHELLEXECUTEINFO exe;
 
void __fastcall TForm1::Button4Click(TObject *Sender)
{
exe.cbSize = sizeof(exe);
exe.fMask = SEE_MASK_NOCLOSEPROCESS;
exe.hwnd = NULL;
exe.lpVerb = "open";
exe.lpFile = "http://www.fipradio.fr/player";
exe.lpParameters = NULL;
exe.lpDirectory = NULL;
exe.nShow = SW_SHOW;
exe.hInstApp = NULL;
ShellExecuteEx(&exe);
}
//-------------------------------------------------------------------------
 
void __fastcall TForm1::Button5Click(TObject *Sender)
{
  if(exe.hProcess)
  { TerminateProcess(exe.hProcess,NULL);
    CloseHandle(exe.hProcess);
  }
}

Si quelqu'un peu m'expliquer pourquoi

Cordialement

EricNo

[ShaiLeTroll]

essaye

Code :

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

exe.lpFile = "iexplore http://www.fipradio.fr/player";

ou

Code :

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

exe.lpFile = "firefox http://www.fipradio.fr/player";

il est possible qu'en exploitant juste l'association shell cela ne fournisse pas de handle

[Guyt54]

Intéressant ton bug, EricNO. Peut-être es-tu tombé là-dessus:

http://blogs.msdn.com/b/oldnewthing/...05/590749.aspx

J'ai bien aimé ce passage:

"First, as we noted, the HINSTANCE that you get from the ShellExecute function is useless. You have to use the ShellExecuteEx function and set the SEE_MASK_NOCLOSEPROCESS flag in the SHELLEXECUTEINFO structure, at which point a handle to process is returned in the hProcess member, But that still doesn't work."

Et la conclusion:

"There is no uniform way to detect that a document has been closed. Each program handles it differently. "

Hâte de voir la solution*!

* après coup, j'en voie une (EnumProcesses), je vais tester ça.

[blondelle]

Salut EricNO
A l'aide de Spy++ j'ai verifie le Handle renvoye par la fenetre qui s'ouvre
Je recupere le Handle de cette facon

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
exe.cbSize = sizeof(exe);
exe.fMask = SEE_MASK_NOCLOSEPROCESS;
exe.hwnd = NULL;
exe.lpVerb = "open";
exe.lpFile = "<a href="http://www.fipradio.fr/player" target="_blank">http://www.fipradio.fr/player</a>";
exe.lpParameters = NULL;
exe.lpDirectory = NULL;
exe.nShow = SW_SHOW;
exe.hInstApp = NULL;
ShellExecuteEx(&exe);
 
 
Sleep(1000);
hwnd = FindWindow("IEFrame", "fip - direct - Mercredi 21 Mars 11:54:15 - Windows Internet Explorer");
hwnd = FindWindow("IEFrame", NULL);

j'ai mis une tempo et repete deux fois FindWindow sinon on ne recupere pas le bon Handle, ce n'est pas tres propre, mais c'est peut etre un debut de piste
si tu utilise ce code il faudra reconstruire la date dans le code "Mercredi 21 Mars 11:54:15" avant appel

[EricNO]

Avec le code suivant j'arrive à récuperer le handle du process à condition qu'une fenetre IE ne soit pas déja ouverte.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
void __fastcall TForm1::Button4Click(TObject *Sender)
{
exe.cbSize = sizeof(exe);
exe.fMask = SEE_MASK_NOCLOSEPROCESS;
exe.hwnd = NULL;
exe.lpVerb = "open";
exe.lpFile = "iexplore";
exe.lpParameters = "http://www.fipradio.fr/player";
exe.lpDirectory = NULL;
exe.nShow = SW_SHOW;
exe.hInstApp = NULL;
ShellExecuteEx(&exe);
}
//-------------------------------------------------------------------------
 
void __fastcall TForm1::Button5Click(TObject *Sender)
{
  if(exe.hProcess)
  { TerminateProcess(exe.hProcess,NULL);
    CloseHandle(exe.hProcess);
  }
}

Au lieu de travailler sur le handle du process, n'y aurait il pas après un shellexecueex une fonction pour recuperer l'ID du process et une autre fonction pour tuer le process avec son ID ?

Merci par avance

EricNO