[Sotrono]

Aca tenes otra forma:

Código Delphi [-]
//Escrito por roman
var
  Input: TInput;
begin
  Input.Itype := INPUT_KEYBOARD;
  Input.ki.wVk := VK_RETURN; // Tecla a simular

  // Presionar tecla
  SendInput(1, Input, SizeOf(Input));

  // Soltar tecla
  Input.ki.dwFlags := KEYEVENTF_KEYUP;
  SendInput(1, Input, SizeOf(Input));

Saludos...