appo

Disables the mouse out of the window forms

Dec 27th, 2013
358
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;
  8.  
  9. // Coded by Appo //
RAW Paste Data