先把#0换成空格, 再载入就可以了 fileStream := tmemorystream.Create(); fileStream.LoadFromFile(AFile); vPChar := fileStream.memory; for I := 0 to fileStream.Size - 1 do begin if vPChar^ = #0 then vPChar^ := ' '; inc(vPChar); end; StringList.LoadFromStream(fileStream);
fileStream := tmemorystream.Create();
fileStream.LoadFromFile(AFile);
vPChar := fileStream.memory; for I := 0 to fileStream.Size - 1 do
begin
if vPChar^ = #0 then
vPChar^ := ' ';
inc(vPChar);
end;
StringList.LoadFromStream(fileStream);
因为是utf8,所以d7下如果不转换下那中文会是乱码,但也是全部显示,不存在LZ说的只显示两行。