Вниз
Скачать: CL | DM;

Проблемы с wsMaximized для MDIChildForm   Найти похожие ветки 

← →
Giperon ©   (2007-07-13 15:29) [0]

Здравствуйте!
В моей программе использован MDI.
Нажатие на кнопку открывает дочернее окно, для которого удобно применить
WindowsState := wsMaximized
для того, чтобы дочерняя форма создавалась максимизированной.
Создается, все хорошо, но в момент создания возникает неприятный эффект мерцания - форма создается, очевидно, с wsNormal, а потом лишь развертывается на всю клиентскую область.
Если кто-то сталкивался с подобным, подскажите, как устранить сей неприятный эффект.


← →
{RASkov} ©   (2007-07-13 15:33) [1]

> [0] Giperon ©   (13.07.07 15:29)

Выставь в дизайнере или в ОнКреате стиль Макс....


← →
Giperon ©   (2007-07-13 15:42) [2]

Именно так я и делаю. И в дизайнере, и в ОнКреате - одинаково. :(


← →
Shamansky_ne   (2007-07-14 15:45) [3]


> Giperon ©   (13.07.07 15:42) [2]
> Именно так я и делаю. И в дизайнере, и в ОнКреате - одинаково.
>  :(

Процесс создания окна ведь такой:
1. создали окошко;
1.a здесь можешь производить с окном разные манипуляции;
2. показали окошко;
Ты немного путаешь, эффект мерцания у тебя происходит при прорисовке дочернего окна, а это уже удет после создания, то есть windowsState здесь уже не причем, может у тебя стоит какая-нибудь громоздкая операция на onShow или onPaint?


← →
Giperon ©   (2007-07-18 12:04) [4]

Спасибо,я все понял.
Теперь я делаю так:
В дизайнере ставлю для дочерней формы
WindowState = wsMinimazed

А потом в коде кнопки, открывающей эту форму:
NewForm := TNewForm.Create(Application);
NewForm.WindowState := wsMaximized;
NewForm.Show;

Теперь эффект значительно поутих.
А причина, скорее всего - в слабеньком компе:)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.017 c
2-1184427323
Bbbbb...
2007-07-14 19:35
2007.08.12
TButton, inherited, Enabled


2-1184337631
Kolan
2007-07-13 18:40
2007.08.12
TPageControl в TScrolBox е какие есть варианты реализации?


2-1184870250
bagos
2007-07-19 22:37
2007.08.12
крашенный stringgrid


3-1177453476
TTable
2007-04-25 02:24
2007.08.12
Как получить указатель на строку в Table1.Fields[2].AsString ?


15-1184597966
TStas
2007-07-16 18:59
2007.08.12
Длинные ветки в поболталовке




   Наверх