[Lazarus] TMouseinput mouse click.

Larry Dalton larrydalton71 at gmail.com
Wed Oct 26 17:40:45 CEST 2016


I am running Lazarus 1.6 on Windows 7. I have one application where I need
to move the mouse to a certain point on the screen and then do a mouseclick
from the program.

When I run the following procedure,

procedure TMain_Form.Button1Click(Sender: TObject);
var MousePos:Tpoint;
MyMouse:TMouseInput;
begin
MyMouse:=TMouseInput.Create;
MousePos:=Mouse.CursorPos;
MousePos.x:=200;
MousePos.y:=75;
Mouse.CursorPos:=MousePos;
MyMouse.Click(mbLeft,[]);
MyMouse.Destroy;

end;

I get the following error code : Abstract Method Called. Click OK to ignore
and risk data corruption or Cancel to kill the program.

I know the problem is in the MyMouse.Click procedure. How do I make this
work?
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20161026/b7235365/attachment.html>


More information about the Lazarus mailing list