MEMO的显示行数有限制？怎么办？(100分)

W

wusuowei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-07

• #1

MEMO的显示行数有限制？到了13XX后就不显示了，有什么办法？
要将上万条STRING，一一的追加到一文本文件，怎么做？

谢谢！我昨天开始学的DELPHI，请尽量详细些！

 

H

honestman

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-07

• #2

这是memo本身的限制，用其他控件代替。

 

P

puzzle

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-07

• #3

Memo 数据似乎不能超过64K.(知道受限制，具体原因忘了)
用 TRichEdit吧。

 

P

panyongze

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-07

• #4

直接写文本文件。
procedure TForm1.Button1Click(Sender: TObject);
var
outfile:TextFile;
i:integer;
begin
assignfile(outfile,'c:/a.txt');
Rewrite(outfile);
for i:=0 to 100000 do writeln(outfile,'第'+inttostr(i)+'行');
Closefile(outfile);
end;

 

W

wusuowei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-07

• #5

多人接受答案了。