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 :
Pouvez-vous m'aider pour ce projet si'il vous plait.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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;
Partager