begin
   GetCursorPos(pos);
   dtInteger(_Data,WindowFromPoint(pos));
end;

begin
   GetCursorPos(pos);
   dtInteger(_Data,ChildWindowFromPoint(pos));
end;

Подготовка к сборке проекта...
Генерация кода целевого языка
Компоновка проекта...
Command line: dcc32.exe "C:\Program Files\HiAsm2\Elements\delphi\code\Project1.dpr" "-UC:\Program Files\HiAsm2\." -Q
Borland Delphi Version 12.0 Copyright (c) 1983,98 Inprise Corporation

C:\Program Files\HiAsm2\Elements\delphi\code\hiMouseEvent.pas(112) Error: Incompatible types: 'HWND' and 'TPoint'

C:\Program Files\HiAsm2\Elements\delphi\code\Project1.dpr(16) Fatal: Could not compile used unit 'hiMouseEvent.pas'
Сборка завершена.