[gCrazy]

Empezado por cHackAll

Código Delphi [-]procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
PostMessage(FindWindowEx(FindWindow('Notepad', nil), 0, 'Edit', nil), WM_KEYDOWN, Key, 0);
end;




Simple, Avanzado

PD; Apoyo lo dicho por cmm07

Suerte

A por la prueba!!! cuando tenga los resultados te estare avisando chackall Gracias!!!!!