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?
-- 
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus-ide.org
http://lists.lazarus-ide.org/listinfo/lazarus

Reply via email to