Teclado Virtual

[elcolo83]

Hola a todos... Miren, tengo este inconveniente, estoy usando esta funcion

Código Delphi [-]
Procedure PulsarTecla(Code: word);
begin
keybd_event(Code, MapvirtualKey(Code, 0),0,0);
keybd_event(Code, MapvirtualKey(Code, 0),KEYEVENTF_KEYUP,0);
end;

...para simular pulsaciones del teclado... el problema es que solo me anda para las letras y teclas como ENTER, TEB, CONTROL, etc. pero no me funciona para un punto (.), coma(,), guion (-)
Alguno sabe en que le estoy errando???
Gracias