Hi!!

Looking to this page (http://wiki.freepascal.org/LCL_Tips) I found a item called "Simulating Mouse and Keyboard input".

I don't found any example about LCLMessageGlue unit. I tried too the following code (on a form with a TEdit called Edit1), that tries insert the "a" character on Edit1:

implementation
uses LCLMessageGlue, LCLType;
{$R *.lfm}

{ TForm1 }

procedure TForm1.Button1Click(Sender: TObject);
var
  akey: Word;
begin
  akey:=VK_A;
  LCLSendKeyDownEvent(Edit1,akey,0,false,True);
  //Sleep(100);
  LCLSendKeyUpEvent(Edit1,akey,0,false,True);
end;

Some ideas?