Comport y Delphi para enviar Comandos AT

[aagrlp640]

Hola compañeros de la comunidad delphi, tengo una pregunta, lo que pasa es que tengo ya instalado el componente comport para comunicarme con los puertos del modem por medio de delphi, lo que quiero es que al enviar el comando "at" me mande el "ok" que se supone debería de aparecer, les pongo mi código a continuación:

Código Delphi [-]
procedure TForm1.BEnviarClick(Sender: TObject);
var
  resp, at : AnsiString;
begin
  ComPort.Open;
  at := 'AT' + chr(13) + chr(10);
  ComPort.WriteStr(at);
  Sleep(10);
  ComPort.ReadStr(resp, 80);
  ShowMessage(resp);
end;

El problema de este código es que el showmessage no me manda nada.
Me podrían decir que está mal o sí alguien ya lo ha hecho antes me podrían mandar parte del código.
De hecho probando desde la hiperterminal y putty si me corren bien los comandos at, así que sí hay comunicación con el modem (Nokia n900)
Lo que uso es:
Celular Nokia n900 para usarlo como modem.
- Cable de datos de Nokia n900 para conectarlo a la pc.
- Delphi 7
- Windows XP
- Componente comport
Saludos ojalá puedan ayudarme.