PDA

Ver la Versión Completa : Sending Keys


Xianto
13-07-2006, 10:00:32
Buenas foro...

Estoy queriendo enviar las pulsaciones del teclado a un juego...

Normalmente con el sndkey32.pas o con keybd_event, funciona, hay muchas formas... pero el juego trabaja con DirectX, asi que hay que bajar un poco más de nivel para poder hacer esto.

Algo como con FindWindow() y SendMessage() de la API, pero no estoy seguro de como hacerlo en delphi.

Por ejemplo para enviar un 0, a un proceso...


var
Ventana: HWnd;

begin
Ventana:= FindWindow(nil, 'GameWindowTitle');
if Ventana<>0 then
SendMessage(Ventana, WM_KEYDOWN, VK_NUMPAD3, 0);
end;


No estoy seguro porque no estoy en casa y no puedo probarlo, pero con esto funcionaria ???

O tendría que bajar aun más y usar GetProcAddress y SendMessajeA o algo así ???

Bueno ya me contaran algo, saludos y suerte.