有没有办法使TMemo显示文本长于1024行?
看看下面这个简单的代码:
procedure TForm1.Button2Click(Sender: TObject);
var
s: string;
i: integer;
begin
s := '';
for i := 0 to 10000 do
s := s + 'a';
Memo1.Clear;
Memo1.Lines.Add(s);
end;长文本"s“将以多行形式显示。Memo1将在1024个字符后自动包装文本。
发布于 2014-11-28 16:04:11
TMemo是本机多行编辑控件的包装器,受其限制。来自INFO: Size Limits for a Multiline Edit Control
多行编辑控件还受到以下限制:
https://stackoverflow.com/questions/27188772
复制相似问题