德尔福：一种模态形式闪烁

Question

有一种模式形式，包括：标签，按钮，组合框。

我在点击按钮时从表单1拨打电话：Form2.ShowModal;

当表格2首先出现时 - 由于混合效果，一切正常。但是下一个表格的外观有一个闪烁，特别是标签，按钮。我尝试使用DoubleBuffered:=True/False and ParentFont:=True/False (in case of a group box, frame)。它没有帮助:(

有人可以帮忙吗？谢谢！

Answer 1

好的，这样可以解决问题，如果还有更好的话，请更换此解决方案......

第一次，OnFormCreate

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

第二次，添加计时器，OnTimerEvent

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

第三次 OnFormShow

Timer1.Enable := True;