没有刷新FMX控件

时间:2017-09-29 13:50:50

标签: delphi firemonkey

我有简单的fmx格式(Delphi 10.2 Tokyo):

structure

form-design

代码中的

我将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;

但是在按钮2隐藏后,会出现人工制品。它在手动形成调整大小后消失了。

form-runtime

如何强制刷新?

1 个答案:

答案 0 :(得分:5)

您需要使用

ShadowEfect1.UpdateParentEffects;