Disables the mouse out of the window forms

appo Dec 27th, 2013 341 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. var
  2. curs: TRect;
  3. begin
  4. SetWindowPos(Handle,HWND_TOPMOST,Left,Top,Width,Height,SWP_NOACTIVATE Or SWP_NOMOVE Or SWP_NOSIZE);
  5. curs := Rect(Form1.Left+0, Form1.Top+0, Form1.Left + Form1.Width-0, Form1.Top + Form1.Height-0);
  6. ClipCursor(@curs);
  7. end;
  9. // 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