Советы по Delphi

       

Ошибка фунциии GetTextLen компонента Memo


По всей видимости, функция GetTextLen в компоненте Memo работает не совсем правильно.

Загрузите в Memo1 большой текстовый файл.

var {пример из файла помощи}
Buffer: PChar;Size: Byte;begin
Size := Memo1.GetTextLen;Inc(Size);GetMem(Buffer, Size);Memo1.GetTextBuf(Buffer, Size);... {не относящийся к делу код...}FreeMem(Buffer, Size);end;

Проблема: Memo1.GetTextLen возвращает размер выводимого, а не всего текста. [000350]



Содержание раздела