freepascal.compiler/docs/mouseex/template.pp

Program Example;

{ Program to demonstrate the *** function. }

Uses mouse;

begin
  InitMouse;
  DoneMouse;
end.