Delphi XE4 FireMonkey TMemo Transparent? (iOS)



有没有办法让TMemo在Delphi/iOS/FireMonkey中透明?

当选择+右键单击备忘录控件时,我看不出有任何方法可以自己编辑样式。。。

尝试在应用样式事件时删除备忘录的背景。

procedure TForm1.Memo1ApplyStyleLookup(Sender: TObject);
var
  BckObject: TFmxObject;
begin
  BckObject := Memo1.FindStyleResource('background');
  if Assigned(BckObject) and (BckObject is TSubImage) then
  begin
    TSubImage(BckObject).Source := nil;
  end;
end;

您需要更改控件的样式,以便根据需要显示透明。不幸的是,Embarcadero并没有提供一个完整的功能示例,只是提供了一些关于自定义FireMonkey应用程序样式主题的信息

相关内容

  • 没有找到相关文章

最新更新