Tastaturereignis an Website übermitteln

[toms]

Hallo, simuliere einen Character so:

Delphi-Quellcode:

procedure Simulate_Key(Key: Char);
begin
  keybd_event(Ord(Key),MapVirtualKey(Ord(Key), 0), 0, 0);
  keybd_event(Ord(Key),MapVirtualKey(Ord(Key), 0), KEYEVENTF_KEYUP, 0);
end;

procedure Simulate_C;
begin
  Simulate_Key('C');
end;