VPF::Мерцание форм - Форум программистов

santilaas

Дата 4.6.2007, 18:06 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 322
Регистрация: 28.8.2005
Где: Блага

Репутация: нет
Всего: нет

Привет всем!
Подобный вопрос я уже как-то раз задавал, но все же:
Что может избавить от мелькания перетаскиваемых форм (и главного меню главной формы) MDI-ого приложения (Doubled bufered не предлагать - пробовал уже - тщетно)?

--------------------

[

Romikgy

Дата 4.6.2007, 19:02 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 26
Всего: 146

Цитата(santilaas @ 4.6.2007, 17:06

)

(Doubled bufered не предлагать - пробовал уже - тщетно)?

У какой формы ставил?
имхо нужно их ставить у дочерних smile

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Poseidon

Дата 4.6.2007, 22:10 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133

Цитата(santilaas @ 4.6.2007, 18:06

)

Doubled bufered не предлагать - пробовал уже - тщетно

Это именно DoubleBuffered и лечится. Нужно ставить у мерцающий компонентов.

Еще для форм можно так:

Код


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;

--------------------

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

santilaas

Дата 5.6.2007, 17:41 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 322
Регистрация: 28.8.2005
Где: Блага

Репутация: нет
Всего: нет

Цитата

Еще для форм можно так:

- уже пробовал - Дельфи ругается на DW_FRAME ?!
тут стоит заметить, когда я перетаскиваю дочерние формы, искажаются при переносе их границы,
сами компоненты на них не мелькают.

и еще вопрос в тему: как заставить не мерцать компонент MainMenu (у него свойства DoubleBuffered нету) ?

--------------------

[

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »