Mega Code Archive

 

Categories / Delphi / System

 

Calışan bir programı kapatmak

var wndhandle: HWnd; begin // Pencerenin başlığı wndhandle := FindWindow(nil, 'My Documents'); if wndhandle <> 0 then PostMessage(wndhandle,WM_CLOSE,0,0); end;