var
MyStringList:TStringList;
begin
MyStringList.Create;
MyStringList.Add('你的串口内容');//写入
MystringList.SaveToFile(C:/你的文件名.TXT);//save
MyStringList.free;
end;
To:黄耀彰,因该是这样,你忘记他得到的是数字,要先转换成字符串才可以加入到Tstringlist里
var
MyStringList:TStringList;
begin
MyStringList.Create;
MyStringList.Add(inttostr('你的串口内容'));//写入
MystringList.SaveToFile(C:/你的文件名.TXT);//save
MyStringList.free;
end;