Вверх ↑
Ответов: 2059
Рейтинг: 132
#1: 2020-07-10 02:36:52 ЛС | профиль | цитата
Gitarist, Я всё думал переделывать компонент, или нет.
Всё равно всё останется как есть, а то можно-бы было сделать и покрасивее и в свойства размер вывести...
В общем так:
По умолчанию RichEdit ограничен 32767 байт.
Чтобы использовать его на полную катушку, надо в файле hiRichEdit.pas? вот здесь:
.....
begin
CanDragOle := _prop_CanDragOle;
{$endif}
Text := _prop_Strings;
// RE_AutoURLDetect := true;
RE_FmtStandard;
RE_FmtAutoColor := true;
RE_Font.FontName := Control.Font.FontName;
RE_Font.Color := Control.Font.Color;
OnRE_URLClick := _OnURLDetect;
Control.MaxTextSize:=MaxInt; // flint2
end;
end;

destructor THIRichEdit.Destroy;
begin
.....
написать такую строку: Control.MaxTextSize:=MaxInt;
Я её пометил, как flint2
карма: 6

0
Редактировалось 1 раз(а), последний 2020-07-10 02:47:42