Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.06.25;
Скачать: CL | DM;

Вниз

Развертывание окна   Найти похожие ветки 

 
Damager   (2006-05-19 17:49) [0]

При развертывании окно немного дергается, и выглядит это некрасиво.

Можно ли временно отключить прорисовку в момент развертывания? Чтобы получить сразу окно в полный экран.


 
Rial ©   (2006-05-19 18:09) [1]

Отрисовку окна можно отключить вот так.

procedure LockControl(Const C:TWinControl;Const bLock,bMustRepaint:Boolean);
begin
If(C=Nil)or(C.Handle=0) then Exit;
If(bLock)then SendMessage(C.Handle,WM_SETREDRAW,0,0)
         else begin
          SendMessage(C.Handle,WM_SETREDRAW,1,0);
          If (bMustRepaint)then
           RedrawWindow(C.Handle,Nil,0,
                        RDW_ERASE or RDW_FRAME or RDW_INVALIDATE or RDW_ALLCHILDREN);
         end;
end;


Но, скорее всего, проблема не в этом.
Нужно уменьшить количество отрисовываемых элементов в окне или
отрисовывать их постепенно после появления окна в первый раз.

Еще попробуй
DoubleBuffered:=True
для формы и панелей.

Возможно, у тебя в обработчике OnResize формы что - либо громоздкое
написано. А при максимизации этот обработчик быдет вызываться, ИМХО,
4 раза. Так что учти это.



Страницы: 1 вся ветка

Текущий архив: 2006.06.25;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.027 c
15-1148894966
ольга
2006-05-29 13:29
2006.06.25
Delphi+AutoCad


15-1149046091
Skins
2006-05-31 07:28
2006.06.25
ATI = GF6600GT Помогите выбрать


1-1147775827
kyn66
2006-05-16 14:37
2006.06.25
Принудительная сортировка столбца в Excel


2-1149339228
Tigraman
2006-06-03 16:53
2006.06.25
Как работать с ListView?


4-1143196595
Тфьу
2006-03-24 13:36
2006.06.25
Как запретить стандартную прокрутку от колеса мыши?