delphi - 通过 AT 命令发送短信行为很奇怪

Question

我正在使用 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 线路上发送的内容？

Answer 1

尝试在命令之间添加轻微的延迟(或等待调制解调器回复，通常为“OK”)。