Delphi XE4 FireMonkey TMemo透明？ （iOS） [英] Delphi XE4 FireMonkey TMemo Transparent? (iOS)

问题描述

在选择+右键时，我没有任何方式自己编辑样式，点击备忘录控件...

解决方案

尝试删除备注的应用风格事件的背景。

  procedure TForm1.Memo1ApplyStyleLookup（Sender：TObject）; 
 var 
 BckObject：TFmxObject; 
 begin 
 BckObject：= Memo1.FindStyleResource（'background'）; 
如果Assigned（BckObject）和（BckObject是TSubImage）然后
 begin 
 TSubImage（BckObject）.Source：= nil; 
结束
结束
  

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...

解决方案

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;

这篇关于Delphi XE4 FireMonkey TMemo透明？ （iOS）的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！