B bjcnv Unregistered / Unconfirmed GUEST, unregistred user! 2010-04-20 #1 准备往文件里写一些乱码,但是发现总是丢字符。变量中的内容:'T'#$D'谕{嶀瘘3s:?堉|u躐'#6'W%?錭C'#0':XT$瓒M'#$F'Hq譲?腎!
放 放飞 Unregistered / Unconfirmed GUEST, unregistred user! 2010-04-20 #4 向文件中写非标准可见字符的字符串,你最好别用writeln ,因为这个函数只要碰到AscII是13的字符,就会结束。文件读写,最好使用 TFileStream 类下面就是针对你给的字符串用TFileStream进行处理的代码procedure TForm1.Button1Click(Sender: TObject);var F: TFileStream; S: AnsiString;begin S := 'T'#$D'谕{嶀瘘3s:?堉|u躐'#6'W%?錭C'#0':XT$瓒M'#$F'Hq譲?腎!
向文件中写非标准可见字符的字符串,你最好别用writeln ,因为这个函数只要碰到AscII是13的字符,就会结束。文件读写,最好使用 TFileStream 类下面就是针对你给的字符串用TFileStream进行处理的代码procedure TForm1.Button1Click(Sender: TObject);var F: TFileStream; S: AnsiString;begin S := 'T'#$D'谕{嶀瘘3s:?堉|u躐'#6'W%?錭C'#0':XT$瓒M'#$F'Hq譲?腎!