Title: Detect mouse position on form
You can use onMouseMove event for your form. This event has coordinates of mouse position.
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Label1.Caption:=IntToStr(X);
Label2.Caption:=IntToStr(Y);
end;