Советы по 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]



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