Delphi XE4 FireMonkey TMemo Transparent? (iOS)

馋奶兔 提交于 2019-12-07 03:20:57

问题


Is there any way to make the TMemo transparent in Delphi/iOS/FireMonkey?

I don't see any way to edit styles myself when selecting + right-clicking the memo control...


回答1:


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;



回答2:


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



来源:https://stackoverflow.com/questions/17653139/delphi-xe4-firemonkey-tmemo-transparent-ios

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