Delphi Firemonkey的多效果

使用Firemonkey（柏林更新2），TButton上是否可能有TShadowEffect和TGlowEffect一起工作

---

要获得阴影效果，我需要禁用辉光效果。

制作一个复合组件：将您的T按钮放在一个三角（形状）内；将TShadowEffect连接到TButton，将TGlowEffect连接到外部三角容器

unit FMX_TwoEffects;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Effects,
  FMX.Controls.Presentation, FMX.StdCtrls, FMX.Objects;

type
  TForm2 = class(TForm)
    Button1: TButton;
    Rectangle1: TRectangle;
    ShadowEffect1: TShadowEffect;
    GlowEffect1: TGlowEffect;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;

implementation

{$R *.fmx}

end.

（FMX文件）

---

制作一个复合组件：把你的T按钮放在一个三角（形状）内；将TShadowEffect连接到TButton，将TGlowEffect连接到外部三角容器

unit FMX_TwoEffects;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Effects,
  FMX.Controls.Presentation, FMX.StdCtrls, FMX.Objects;

type
  TForm2 = class(TForm)
    Button1: TButton;
    Rectangle1: TRectangle;
    ShadowEffect1: TShadowEffect;
    GlowEffect1: TGlowEffect;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;

implementation

{$R *.fmx}

end.

（FMX文件）

---

我就是这么做的，但不太实际。感谢您的回复：）您也可以使用TLayout，如文档中所述：[zdzichs的固定链接：这是我所做的，但并不实用。感谢您的回复：）您也可以使用TLayout，如文档中所述：[zdzichs的固定链接：