房天下 > 房天下问答 > 业主生活 > 其他
  • delphi 编的小程序有点问题。。。。

    varf:textfile;a:string;beginif opendialog1.Execute thenbeginmemo1.Clear ;assignfile(f,opendialog1.filename);reset(f);while not eof(f) dobeginapplication.ProcessMessages;read(f,a);memo1.Lines.Add(a);end;closefile(f);end;我用了一个opendialog 一个button一个memo 想从文本中读东西 但是为甚么在文本中两行中有一行空的 程序就死了想退都退步出来啊 ,如果不空格就能正常执行 为什么啊?

    提问者:zoubufeng

    发布于2010-12-09

共1个回答
  • 不死鸟之都 丨Lv 3
    将read(f,a);改为readln(f,a);即可
    +1 2010-12-09 举报
热门人气推荐
免责声明:问答内容均来源于互联网用户,房天下对其内容不负责任,如有版权或其他问题可以联系房天下进行删除。