Delphi XE4 FireMonkey TMemo Transparent? (iOS)

允我心安 提交于 2019-12-05 06:17:41

Try removing memo's background on applying style event.

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;

You need to change the style of the control you want to display transparent as you want. Unfortunately Embarcadero does not provide a fully functional example, only some information on the Customizing FireMonkey Applications with Styles topic

易学教程内所有资源均来自网络或用户发布的内容,如有违反法律规定的内容欢迎反馈
该文章没有解决你所遇到的问题?点击提问,说说你的问题,让更多的人一起探讨吧!