procedure readf(filea:string);
var 
  filet:filetext;
  straa:string;
begin
  if assignfile(filet,filea) then//如果成功在处理
  begin
    reset(filet);
    Richedit1.lines.clear;//先清空
    while not eof(filet)
      begin
      readln(filet,straa);
      richedit1.lines.add(straa);  //这里出错,你最好跟踪一下straa的值,可能读到了什么richedit产生误解的字符;//具体情况具体处理
     end;
   closefile(filet);
  end;
end;

解决方案 »

  1.   

    这个问题我以前也出过,是在dell台式机上都这个样子。
      

  2.   

    TO:glink(飞天一狐)有没有解决方法?
      

  3.   

    有些文字,插入到RichEdit时会产生这种错误信息,但是文字最终仍然插入到
    RichEdit中了。所以,在插入时,用try拦截就可以了。
    while not eof(filet)
    begin
        readln(filet,straa);
        try
            richedit1.lines.add(straa); 
        except
        end;
    end;
      

  4.   

    解决办法,就是不在dell的机上安装,或者给他升级到window98第二版(不过,我没做,dell的windows98是第一版的。
      

  5.   

    jishiping(JSP 季世平):你的办法解决了这个问题,但是为什么出错呢?
      

  6.   

    这是我在网页上找到的资料,大家参考一下:
    RichEdit line insertion errorEither your system is low on available resources or your source data contains unacceptable control characters (i.e. control characters, not ASCII text).  Although this error message is rare, it does occur on older computers running Windows 95 and the First Edition of Windows 98.  If you are running either of these operating systems, you should consider upgrading to Windows 98 Second Edition. 要不是您的系統可用資源過低,要不然就是來源資料裡含有不接受的控制字元 (如控制字元而非 ASCII 文字等)。此狀況並不常見,出現在舊版的 Windows 95, 98 第一版,因此建議考慮換成 98 第二版以上。
    Philosophical Quotations for Windows - Known Errors1. Reported 28/07/01 - Exception EReadError in module QUOTES.EXE at 00010F19. Error reading RichEdit2.Lines.Strings. RichEdit line insertion error. This error message is due to a size limitation with richedit components for some versions of Windows. An exception error is raised when trying to insert text greater than 64KB. It has to do with the version of riched32.dll that you're using on your computer.如大家没有什么问题的话,28号结分。