symulacja naciśnięcia klawiszy

0

jak symulować naciśnięcia klawiszy? np. jak mam edita, to żebym mając jego aktywne okno, przy uruchomionym w tle programie mógł za pomocą tego cichego programu coś napisać? TU NIE CHODZI O ŻADNE TROJANY I INNE HU***STWO

mam tu jakiś kod, ale nie działa mi... a może dlatego że mam xp?
[delphi]

var
Form1: TForm1;
Hook,ex : Integer;
Komunikat : TEventMsg;
KomunikatLista : TKomunikatLista;
KomIlosc : word ;

implementation

{$R *.DFM}

function Play(Code: integer; wParam, lParam: Longint): Longint; stdcall;
begin
case Code of
hc_Skip: begin
inc(KomIlosc);
if KomunikatLista.Count

0

keybd_event jest prostsze w użyciu. Poszukaj na forum, w FAQ lub Windows SDK.

1 użytkowników online, w tym zalogowanych: 0, gości: 1