Отправка sms через AT-команду ведет себя странно

Я использую компонент ComPort для отправки SMS-сообщений через модем, проблема в том, что иногда я получаю sms, иногда нет, иногда я получаю команды at в теле текстового сообщения.

Вот мой код:

procedure SendSmsCosmote(numar,text : string);
const
  buf : Byte = 26;
begin
  Form1.ComPort1.WriteStr('AT+CMGF=1'+#13#10);
  Form1.ComPort1.WriteStr('AT+CMGS="'+ numar + '"'+#13);
  Form1.ComPort1.WriteStr(text);
  Form1.ComPort1.Write(buf,1);
end;

Что я делаю не так? И почему при чтении с модема я получаю то, что отправил по линии tx?