Discussion :

[mehat]

Bonjour ,
j'ai developper une application en delphi.
quand je lance cette application le processus "iexplore.exe" se lance en parallèle puisque j'utilise le composant ActivX, bon, mon problème est apparu quand je ferme mon application le processus "iexplore.exe" ne se ferme pas ,
j'essaye d'utiliser se bout de code : en fait c'est une fonction qui fait la fermeture de ce processus :

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
25
26
27
28
29
30
31
32
 
function KillTask(ExeFileName: string): integer;
const
  PROCESS_TERMINATE=$0001;
var
  ContinueLoop: BOOL;
  FSnapshotHandle: THandle;
  FProcessEntry32: TProcessEntry32;
begin
  result := 0;
 
  FSnapshotHandle := CreateToolhelp32Snapshot
                     (TH32CS_SNAPPROCESS, 0);
  FProcessEntry32.dwSize := Sizeof(FProcessEntry32);
  ContinueLoop := Process32First(FSnapshotHandle,
                                 FProcessEntry32);
 
  while integer(ContinueLoop) <> 0 do
  begin
    if ((UpperCase(ExtractFileName(FProcessEntry32.szExeFile)) =
         UpperCase(ExeFileName))
     or (UpperCase(FProcessEntry32.szExeFile) =
         UpperCase(ExeFileName))) then
      Result := Integer(TerminateProcess(OpenProcess(
                        PROCESS_TERMINATE, BOOL(0),
                        FProcessEntry32.th32ProcessID), 0));
    ContinueLoop := Process32Next(FSnapshotHandle,
                                  FProcessEntry32);
  end;
 
  CloseHandle(FSnapshotHandle);
end;

Mais cette fonction faire fermer toute les fenêtre de navigateur ouvert,
Est ce qu'il y a une solution pour faire fermer juste le processus de "iexplore.exe" qui a été créer avec mon application.???

Merci pour votre aide.

[JustMe]

Je pense que tu dois exécuter ton explorateur avec CreateProcess si c'est concluant tu dois sauvegarder les Handle de tes processus Crées en sauvegardant hProcess de l'argument ProcessInformation ensuite pour les fermer tu utilise TerminateProcess qui aura besoin du ProcessHandle que tu as préalablement sauvegardé s'il existe toujours bien sur.

[mehat]

désolé j'ai pas compris votre réponse , si vous avez quelques exemple qui utilise votre solution
En fait je travail sur une grande application en delphi qui se base sur Activx, et je sais pas comment et ou se fait la création de processus "iexplore.exe".

Merci