The following entry was added to the Free Pascal contributed units:
Name : mouse.pas
Author : Becheru Petru
Email : [EMAIL PROTECTED]
Homepage : http://
FTP site : ftp://
Version : 1
Date : 2003-02-12
Category : Graphics
Supported OS : dos
Description :
this unit provides acces to all mouse functions
{-srool:i don't know how(*my documentation is old,but good :)*)}
procedure HardMsReset( var ok :boolean;
var b :word
);
procedure SoftMsreset( var ok :boolean;
var b :word
);
procedure ShowMs;
procedure HideMs;
procedure GetMsPosBut(
var x,y
:word;
var lb,rb,cb
:boolean);
procedure PutMs(x,y:word);
procedure SetMsShape(s:string);
procedure GetBtDown(
b
:buton;
var n,x,y :word);
procedure GetBtReleased(
b
:buton;
var n,x,y :word);
procedure SetMsHorizRange(xmin,xmax :word);
procedure SetMsVertRange(ymin,ymax :word);
procedure GetMsDist(
var x,y :integer);
procedure SetMsExclutionArea(x1,y1,x2,y2 :word);
procedure SetMsSens(x,y,d :word);
procedure GetMsSens(x,y,d :word);
procedure SetMsActivPg(p :word);
function GetMsActivPg:word;
procedure DeactivateMsDriver;
procedure ActivateMsDriver;
_______________________________________________
fpc-announce maillist - [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-announce
