Управление MouseOver через Hint

Written on . Posted in [Delphi] Система. Железо

procedure TForm1.Timer1Timer(Sender: TObject);
begin

mouse_event(MOUSEEVENTF_MOVE, Random(21) - 10,
Random(21) - 10, 0, 0);
end;

форум делфи