当我发送命令“ AT + CUSD = 1，” * 200＃“，15”时，我得到响应：
OK
+CUSD: 0,"Crdit :1.33DA au 21/05/20.Credit offert :0DA",15
是否有一个函数或另一个AT命令来获取
Crdit :1.33DA au 21/05/20.Credit offert :0DA
这是我想要的答案吗？
如何仅从TComPort-Delphi获得正确的响应？
•
问答
zhuxiaoliang811 回答：如何仅从TComPort-Delphi获得正确的响应？
调制解调器响应是字符串包除以逗号。
您可以：
-将此字符串分配给TStringList.DelimitedText以获得单个子字符串的集合
-按第0个项目标识包装-这里'CUSD'
-以'Crdit...'
Memo.Lines（类型为TStrings）的示例：
var
s: string;
sl: TStringList;
begin
s := '+CUSD: 0,"Crdit :1.33DA au 21/05/20.Credit offert :0DA",15';
sl := TStringList.Create;
try
sl.Delimiter := ',';
sl.StrictDelimiter := True;
sl.DelimitedText := s;
Memo1.Lines.Add(sl[1]);
finally
sl.Free;
result in sl:
+CUSD: 0
Crdit :1.33DA au 21/05/20.Credit offert :0DA
15
in Memo:
Crdit :1.33DA au 21/05/20.Credit offert :0DA