usemouse.dpr

来自「DELPHI中开发系统钩子大全包括使用DLL和不使用DLL的多种方式.」· DPR 代码 · 共 15 行

program UseMouse;

uses
  Forms,
  Unitmain in 'Unitmain.pas' {Form1},
  UnitHookConst in 'UnitHookConst.pas';

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.