怎样将一个200M的大文本中的数据分行读出来......

Question

乱码问题可以用UNICAODE解决，WIDESTRING；
RICHEDIT可以最大2G，不知道可以吗？

Answer 1

用WideString读数据。这样中文就是一个字符了。

Answer 2

var   F: TextFile;
  S: string;
begin
  if OpenDialog1.Execute then            { Display Open dialog box }
  begin
    AssignFile(F, OpenDialog1.FileName); { File selected in dialog }
    Reset(F);
    Readln(F, S);                        { Read first line of file }
    Edit1.Text := S;                     { Put string in a TEdit control }
    CloseFile(F);
  end;
end;