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

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

Как в RichEdit промотать текст при добовлении новых строк и [D6, WinME]

waterfoll ©   (2003-01-29 12:42:00) 

и как его отучить маргать, я добовляю данные в него програмно, и он иногда моргает. И еще вопрос, можно какнибыть сделать слевой стороны отступ небольшой от левого края, чтобы при шелчке по нему выделялась вся строка?

---

alxx   (2003-01-29 13:00:00) [1]

Отступ следует сделать в каком-нибудь другом компоненте рядом.

А отключить/включить прорисовку можно так:

procedure BeginScreenUpdate( hwnd : THandle );
begin
if (hwnd = 0) then
hwnd := Application.MainForm.Handle;
SendMessage( hwnd, WM_SETREDRAW, 0, 0 );
end;


procedure EndScreenUpdate( hwnd : THandle; erase : Boolean );
begin
if (hwnd = 0) then
hwnd := Application.MainForm.Handle;
SendMessage( hwnd, WM_SETREDRAW, 1, 0 );
RedrawWindow( hwnd, nil, 0, DW_FRAME + RDW_INVALIDATE +
RDW_ALLCHILDREN + RDW_NOINTERNALPAINT );
if (erase) then
Windows.InvalidateRect( hwnd, nil, True );
end;

---

Наверх