SendMessage ne réagit pas

Bonjour,

Je me permets de vous demandez de l'aide. J'essaie, en vain ,de fermer une application ouverte à l'aide de createProcess comme décrit dans la FAQ. La création se passe très bien. Seulement, je n'arrive absolument pas à le clore.
Je n'ai aucune erreur. Il y a forcément un détail qui m'échappe mais lequel ?


Voici mon code :

Code:

---

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

procedure TfrmMain.openAppli; begin FillChar(FProcessStartInfo,SizeOf(FProcessStartInfo),#0); FProcessStartInfo.cb := SizeOf(FProcessStartInfo);   CreateProcess(Nil, 'calc.exe', Nil, Nil, False,0, Nil, Nil, FProcessStartInfo,FProcessInfo); end;   procedure TfrmMain.btnCloreClick(Sender: TObject); Begin SendMessage(FProcessInfo.hprocess,WM_close,0,0); end;

---

Merci pour votre aide.

Il y a probablement une différence entre le Handle sur le Process et sur la fenêtre.

Essaye CloseHandle ou un SendMessage sur FProcessInfo.hThread.

C'est bien à la fenêtre qu'il faudrait envoyer WM_CLOSE ;)

Mais puisque tu as le ThreadId, tu peux envoyer WM_QUIT par PostThreadMessage :

Code:

---

PostThreadMessage(FProcessInfo.dwThreadId, WM_QUIT, 0, 0);

---

Citation:

---

Envoyé par tourlourou

Il y a probablement une différence entre le Handle sur le Process et sur la fenêtre.

---

Effectivement , si je fais un FindWindows, ce n'est pas le même Handle. Et avec le Handle récupéré je peux fermer via un sendMessage.
Cependant, l'appli final que je dois gérer est susceptible de changer de nom de fenêtre. Ducoup je ne peux pas envisager d'utiliser le FindWindows.

Avec

Code:

---

TerminateProcess(FProcessInfo.hProcess,0);

---

c'est fonctionnel, mais ce n'est pas très propre selon les différentes discussions que j'ai pu lire...

Y aurait-t-il une autre manière de faire ?

Andnotor, nos postes se sont croisés mais ta solution fonctionne super.

Merci beaucoup pour ces réponses .

Bonne journée