![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
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);