[Lazarus] VK_* problem.

Larry Dalton larrydalton71 at gmail.com
Sat Oct 29 16:24:49 CEST 2016


I have an application that requires MouseAndKeyInput.lpk. I am using
lazarus_1.6-0_amd64.deb, fpc-src_3.0.0-151205_amd64.deb, on Linux Cinnamon.
I also am using it on Windows 7, and Windows 10.
I need to print strings at a certain position on a webpage.
I can't get it to print uppercase letters.
Here is the test procedure I am using:


procedure TMain_Form.TestButtonClick(Sender: TObject);
var test_string:string;
      right_string:boolean;
begin
        KeyInput.Press(VK_L);
        KeyInput.Press(VK_a);
        KeyInput.Press(VK_r);
        KeyInput.Press(VK_r);
        KeyInput.Press(VK_y);
        KeyInput.Press(VK_SPACE);
        KeyInput.Press(VK_D);
        KeyInput.Press(VK_a);
        KeyInput.Press(VK_l);
        KeyInput.Press(VK_t);
        KeyInput.Press(VK_o);
        KeyInput.Press(VK_n);

end;

The resulting string is 'al';
It should be printing 'Larry Dalton';
Instead, it is printing 'larry dalton';

How can I get it to print the uppercase letters?
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20161029/28cf7dde/attachment.html>


More information about the Lazarus mailing list