一个奇怪的问题，对流方面是高手的进来。

Question

我用以下代码不能正确读取这个文本文件（此文本文件可以用邮箱发给你吗？）procedure TForm1.Button1Click(Sender: TObject);
var
  MyFile : TFileStream;
begin
  if OpenDialog1.Execute then
  begin
    MyFile := TFileStream.Create(OpenDialog1.FileName, fmOpenRead);
    Memo1.Lines.LoadFromStream(MyFile);
    MyFile.Free;
  end;
end;请不要更改此文本文件里的信息。或重新存盘为另一个文件。

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenDialog1.Execute then
  begin
    Memo1.Lines.LoadFromFIle(OpenDialog1.FileName);
  end;
end;

Answer 2

楼主的程序本身没有问题。
文件流也没有问题。
如果有问题，只可能是TMEMO部件上。。