SHARE
TWEET

Closing the window for the title window

appo Dec 27th, 2013 327 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. //глобальная
  2. var
  3. tit:HWND;
  4.  
  5. procedure TForm1.Timer1Timer(Sender: TObject);
  6. begin
  7. tit:=FindWindow(nil, 'Мой компьютер'); // Window name
  8. if (tit>0) then
  9. PostMessage(tit, WM_CLOSE, 1, 0);
  10. end;
  11.  
  12. // Coded by Appo //
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!
 
Top