level 3
TStringList.LoadFromStream 的时候遇到
#10#
13直接就不继续往下了 ,求大佬指点应该怎么办
2022年05月05日 08点05分
1
level 3
啊不好意思 特殊字符是#0,遇到这就卡住了 但是readln就不会
2022年05月05日 08点05分
2
自己读Stream然后转String再添加到List吧,TStrings读Stream转String后再转PChar来添加行,遇到#0就认为字符串结束了。
2022年05月06日 14点05分
level 5
如果是delphi7的话,可以更改Classes单元中的SetTextStr函数,把while not (P^ in [
#0,#
10,
#13]) do Inc(P)中的#
0去掉
2022年05月10日 07点05分
3