Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.11;
Скачать: [xml.tar.bz2];




Вниз

Опять про Memo !!!!!!!!!!!! 


AlexPro!   (2002-02-22 14:09) [0]

Почему так происходит?
RecString:=TStringList.Create;
RecString.LoadFromFile(CurrDir+"\mail.log");
Memo1.Lines:=RecString;
SendMessage(Memo1.Handle, WM_KEYDOWN, VK_END, 0);

Курсор позиционируется в конец, а так НЕТ

Memo1.Lines.LoadFromFile(CurrDir+"\mail.log");
SendMessage(Memo1.Handle, WM_KEYDOWN, VK_END, 0);



Romkin   (2002-02-22 14:13) [1]

Memo1.Lines.assign(RecString);
Memo1.Lines:=RecString; - присваивает указатель, что приводит к утечке памяти



MBo   (2002-02-22 14:22) [2]

memo1.selstart:=length(memo1.text);



AlexPro!   (2002-02-22 15:42) [3]

Применил
Memo1.Lines.LoadFromFile(CurrDir+"\mail.log");
Memo1.SelStart:=Length(Memo1.Text);
SendMessage(Memo1.Handle, WM_KEYDOWN, VK_END, 0);

Получилось и позиционирование и скролинг в конец.

Всем спасибо !




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.016 c
14-32546          Igor_thief            2002-01-25 14:54  2002.03.11  
Components


6-32536           nimpo                 2001-12-25 01:48  2002.03.11  
net


1-32461           Lotus                 2002-02-23 13:22  2002.03.11  
цветной фрагмент RichEdit


3-32415           КСА                   2002-02-12 12:05  2002.03.11  
InterBase. Deadlock detected


4-32604           BorisM                2002-01-11 04:07  2002.03.11  
Размеры окна другого приложения...