Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Memo-scrolling


AlexF ©   (2005-10-28 16:11:00) 

Может ламерский вопрос но что я только не пробовал. Помогите пожайлуста:

procedure Tfrm_start.FormCreate(Sender: TObject);
begin
try
frm_start.Memo1.Lines.LoadFromFile(....);
//чево дописать чтобы после открытия формы я видел в мемо последнюю строку загруженого файла
except
 on E:EFOpenError do .....;
end;
end;


Leonid Troyanovsky   (2005-10-28 18:31:00) [1]


> clickmaker ©   (28.10.05 17:08) [1]
> SendMessage(Memo1.Handle, EM_LINESCROLL, 0, Memo1.Lines.
> Count);


> //чево дописать чтобы после открытия формы я видел в мемо

Memo1.Perform(EM_SCROLLCARET, 0, 0); // прокрутить в позицию карета

--
Regards, LVT.


clickmaker   (2005-10-28 17:08:00) [2]

SendMessage(Memo1.Handle, EM_LINESCROLL, 0, Memo1.Lines.Count);


Наверх

Титульная страница Поиск, карта сайта Написать письмо