simmons@cs.odu.edu (Gregory S. Simmons) (11/16/90)
About 1 year ago I put together some great mouse routines for TP5. They worked great except for 1 item that is. They would not work well when I put my screen into VGA mode. CGA/EGA they worked great, but in VGA mode they would work such that the mouse pointer wouldn't go beyound the 350 pixel on the screen (may have been only the 200, I forget), and after a few seconds of moving the mouse around screen the entire system would lock up (Go figure). ANYway, has anyone had experience in dealing with mouses and VGA mode? Perhaps someone could point out a consideration I forgot to take into consideration. Greg Simmons simmons@xanth.cs.odu.edu
zhou@brazil.psych.purdue.edu (Albert Zhou) (11/17/90)
Try to reset the mouse boundary. Here is the code: Procedure SetMouseBoundary(x1,y1,x2,y2); var Reg: Registers; begin Reg.AX := 7; Reg.CX := x1; Reg.DX := x2; Intr($33, Reg); Reg.AX := 8; Reg.CX := y1; Reg.DX := y2; Intr($33, Reg); end; Make sure you set the boundary to the full range of VGA if you want to use the full screen.