不清爽FMX控制

Question

我有简单的FMX形式（德尔福10.2东京）：

在代码中，我展示Button2的为第二：

procedure TForm6.FormCreate(Sender: TObject); 
begin 
    Button2.Visible :=false; 
end; 

procedure TForm6.Button1Click(Sender: TObject); 
begin 
    Button2.Visible := true; 
    TTask.Create(procedure 
     begin 
      Sleep(1000); 
      TThread.Synchronize(nil, procedure 
       begin 
        Button2.Visible := false; 
        //tries 
        //Button2.Repaint; 
        //Layout1.Repaint; 
        //Self.InvalidateRect(Self.Bounds); 
        //Application.ProcessMessages; 
       end); 
     end).Start; 
end; 

但BUTTON2后皮革，人造物出现。它后手动形式调整大小。

如何迫使它刷新？

Answer 1

您需要使用

ShadowEfect1.UpdateParentEffects;