procedure TfrmStkFileDataInput.LoadFromTxtFile(const AFileName: string;
ARow: TStringList);
var
Stream: TStream;
begin
Stream := TFileStream.Create(AFileName, fmShareDenyNone);
try
ARow.LoadFromStream(Stream);
finally
Stream.Free;
end;
end;
HEADER|ITP1.00 | | 332| |XHKG01|20160322-10:42:14.000|0|3
MD401|00001|晫T 0 0 0 0 0 0 0 0 0 0 0 0 0 0|CKH HOLDINGS | 1557332| 157912384.600| 100.000| 101.300| 102.000| 100.600| 101.300| 101.300| 11000| 101.400| 47000|0 |10:42:13.000
MD401|00002|-N5u 0 0 0 0 0 0 0 0 0 0 0 0|CLP HOLDINGS | 535346| 36902500.500| 69.150| 69.100| 69.150| 68.800| 69.100| 69.050| 12000| 69.100| 35500|0 |10:41:55.000
讀到‘晫T’后面就遇到0x00了
uj5u.com熱心網友回復：
TStringList遇到0就結束了，可以在TStream里把0替換成空格，處理一下uj5u.com熱心網友回復：
不這是00的問題,"晫"這是什么鬼,我看是亂碼了轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/70436.html
標籤：非技術區