Bonjour,
j'ai une application qui peut créer de multiples fiches sous forme de boites de message de même class mais pas de même caption.
Jusqu'à présent la fermeture de l'application entrainait la fermeture de toutes les fiches (elles ne sont pas MDIChild).
Je souhaiterais dorénavant les fermer en cours d'utilisation et je ne trouve pas le moyen même avec Fincomponent.
j'ai bien tenté d'utiliser
mais ça me ferme mon application...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 LeHandle := 1; While LeHandle <> 0 do begin LeHandle := FindWindow('TClass ', 'Name'); GetWindowThreadProcessId(LeHandle, @dwProcessId); If dwProcessId <> 0 then begin HandleProcess := OpenProcess(PROCESS_TERMINATE, False, dwProcessId); TerminateProcess(HandleProcess,0); end; end;
Partager