Delphi: модальная форма мерцает

Question

Существует модальная форма с: ярлыками, кнопками, групповыми полями.

Я звоню из формы 1 по нажатию кнопки: Form2.ShowModal;

Когда форма 2 появляется первой - все в порядке из-за эффекта наложения. Но у появления следующей формы есть мерцание, особенно надписи, кнопки. Я пытался использовать DoubleBuffered:=True/False and ParentFont:=True/False (in case of a group box, frame). Это не помогает: (

Кто-нибудь может помочь, пожалуйста? Спасибо!

Answer 1

ОК, это поможет, замените это решение, если есть что-то лучшее ...

1-й , OnFormCreate

Form2.AlphaBlendValue := 0;
Form2.AlphaBlend := true;

2-й , Добавить таймер, OnTimerEvent

Form2.AlphaBlendValue := 255;  
Form2.AlphaBlend := false;
Timer1.Enable := False;

3-й OnFormShow

Timer1.Enable := True;