I can't get it to print an uppercase letter Sent from my iPhone
On Oct 28, 2016, at 01:24, Balázs Székely via Lazarus <lazarus@lists.lazarus-ide.org> wrote: >>> 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. > -- > _______________________________________________ > Lazarus mailing list > Lazarus@lists.lazarus-ide.org > http://lists.lazarus-ide.org/listinfo/lazarus -- _______________________________________________ Lazarus mailing list Lazarus@lists.lazarus-ide.org http://lists.lazarus-ide.org/listinfo/lazarus