我尝试使用 和 来创建TToolbar一个TActionList工具TSpeedbutton栏TImageList。
我使用了32px的方形图像,但是当我在TSpeedButton中通过ImageIndex选择图像时,图像大小小于32px,我认为是16px。
如何TSpeedButtons使用来设置图像的大小TImageList?
这是一个 MVCE:
unit Unit50;
interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
System.Actions, FMX.ActnList, FMX.Controls.Presentation, FMX.StdCtrls,
System.ImageList, FMX.ImgList;
type
TForm50 = class(TForm)
ActionList1: TActionList;
ImageList1: TImageList;
SpeedButton1: TSpeedButton;
Action1: TAction;
end;
var
Form50: TForm50;
implementation
{$R *.fmx}
end.
Run Code Online (Sandbox Code Playgroud)
设计制造:
object Form50: TForm50
Left = 0
Top = 0
Caption = 'Form50'
ClientHeight = 480
ClientWidth = 640
FormFactor.Width = …Run Code Online (Sandbox Code Playgroud)