Geler un programme externe
Je voulais faire un programme sur windows 7 pour pouvoir arrêter temporairement le fonctionnement d'autres programmes et je voulais savoir quelle fonction utiliser. Pour le moment, la solution que j'ai trouvée et qui ne fonctionne pas est ci dessous :
Code:
1
2
3
4
5
6
7
8
9
|
procedure TMainForm.SuspendreClick(Sender: TObject);
var WinHandle : hwnd;
proc : cardinal;
begin
GetWindowThreadProcessId(StrToInt(SelectH.Cells[2{j'ai testé, c'est bien la bonne colonne}, SelectH.Row]), proc); //récupère le pid d'une fenetre dont le handle est stocké dans un StringGrid
WinHandle:= OpenProcess(PROCESS_ALL_ACCESS, false, proc);
SuspendThread(WinHandle);
end; |
Pouvez-vous m'aider pour ce projet si'il vous plait.
