[Android] Прозрачность TMemo Delphi XE8

[Satellite]

Давно интересует вопрос, как TMemo сделать прозрачным, дабы не было фона? Transparent отсутствует. 

[Равиль Зарипов (ZuBy)]

сквозь форму? или видеть что под TMemo лежит? например фон формы

[Satellite]

сквозь форму? или видеть что под TMemo лежит? например фон формы

Мне нужно, чтобы у TMemo фона не было, чтобы был виден только текст на форме.

[AngryOwl]

Отредактировать стиль. Например, добавив новый для "прозрачного" TMemo.

Что-то типа такого:

  object TLayout
    StyleName = 'memofreestyle'
    EnableDragHighlight = False
    Position.X = 280.000000000000000000
    Position.Y = 249.000000000000000000
    Size.Width = 290.000000000000000000
    Size.Height = 175.000000000000000000
    Size.PlatformDefault = False
    Visible = False
    TabOrder = 97
    object TActiveStyleObject
      StyleName = 'background'
      Align = Contents
      EnableDragHighlight = False
      Size.Width = 290.000000000000000000
      Size.Height = 175.000000000000000000
      Size.PlatformDefault = False
      ActiveTrigger = Focused
      ActiveLink = <
        item
          CapInsets.Left = 7.000000000000000000
          CapInsets.Top = 7.000000000000000000
          CapInsets.Right = 7.000000000000000000
          CapInsets.Bottom = 7.000000000000000000
          SourceRect.Left = 238.000000000000000000
          SourceRect.Top = 86.000000000000000000
          SourceRect.Right = 318.000000000000000000
          SourceRect.Bottom = 113.000000000000000000
        end>
      SourceLink = <>
      object TRectangle
        StyleName = 'Rectangle1'
        Align = Contents
        EnableDragHighlight = False
        Fill.Color = x32000000
        HitTest = False
        Sides = []
        Size.Width = 290.000000000000000000
        Size.Height = 175.000000000000000000
        Size.PlatformDefault = False
        Stroke.Color = xC8282828
        Visible = False
      end
      object TLayout
        StyleName = 'content'
        Align = Client
        EnableDragHighlight = False
        Size.Width = 290.000000000000000000
        Size.Height = 175.000000000000000000
        Size.PlatformDefault = False
      end
    end
    object TBrushObject
      StyleName = 'foreground'
    end
    object TBrushObject
      StyleName = 'selection'
      Brush.Color = x7F67A8D3
    end
    object TFontObject
      StyleName = 'font'
    end
  end