[Lazarus] TMouseinput mouse click.

[Balázs Székely]

>>Is there a procedure to print a string at the cursor?

uses MouseAndKeyInput, LCLType;

procedure TForm1.Button1Click(Sender: TObject);
var
  Str: String;
begin
  MouseInput.Move([], 200, 75);
  MouseInput.Click(mbLeft,[], 200, 75);
  KeyInput.Press(VK_T);
  KeyInput.Press(VK_e);
  KeyInput.Press(VK_s);
  KeyInput.Press(VK_t);
end;  



--
View this message in context: http://free-pascal-lazarus.989080.n3.nabble.com/Lazarus-TMouseinput-mouse-click-tp4050096p4050105.html
Sent from the Free Pascal - Lazarus mailing list archive at Nabble.com.