错误 "RichEdit line insertion error!"
liuyb 2002-07-21 03:39:18 在使用richedit控件读入文件时的错误。
代码如下:
procedure readf(filea:string);
var
filet:filetext;
straa:string;
begin
assignfile(filet,filea);
reset(filet);
while not eof(filet)
begin
readln(filet,straa);
richedit1.lines.add(straa); //在此出错;
end;
closefile(filet);
end;
在很多机子上没问题,在一台win98se(刚安装)中出此错误,编程使用delphi6。delphi4也出同样的问题。因为要对文件进行分析不能使用 richedit1.lines.loadform('文件名')方式读入。我也知道是插入错误,但是为什么出错,在什么情况下会有这样的错误?
先谢过各位。