- library hidemouse;
-
- uses
- Windows,
- SysUtils;
- function hide(mWnd, aWnd: HWND; data, parms: PChar; show, nopause:boolean):integer; stdcall;
- begin
- showcursor(false);
- Result := 2;
- End;
- function show(mWnd, aWnd: HWND; data, parms: PChar; show, nopause:boolean):integer; stdcall;
- begin
- showcursor(true);
- Result := 2;
- End;
- function version(mWnd, aWnd: HWND; data, parms: PChar; show, nopause:boolean):integer; stdcall;
- begin
- lstrcpy(data ,'/echo -a Hide mouse v1.00 by |PaRa-BoL http://www.IRC-France.com');
- Result := 2;
- End;
- exports
- hide,
- show,
- version;
- {$R *.res}
- begin
- end.
library hidemouse;
uses
Windows,
SysUtils;
function hide(mWnd, aWnd: HWND; data, parms: PChar; show, nopause:boolean):integer; stdcall;
begin
showcursor(false);
Result := 2;
End;
function show(mWnd, aWnd: HWND; data, parms: PChar; show, nopause:boolean):integer; stdcall;
begin
showcursor(true);
Result := 2;
End;
function version(mWnd, aWnd: HWND; data, parms: PChar; show, nopause:boolean):integer; stdcall;
begin
lstrcpy(data ,'/echo -a Hide mouse v1.00 by |PaRa-BoL http://www.IRC-France.com');
Result := 2;
End;
exports
hide,
show,
version;
{$R *.res}
begin
end.