KsLibs/Demos/Android Helper/Unit1.fmx

object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'Form1'
  ClientHeight = 480
  ClientWidth = 383
  FormFactor.Width = 320
  FormFactor.Height = 480
  FormFactor.Devices = [Desktop]
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  DesignerMasterStyle = 0
  object mmo1: TMemo
    Touch.InteractiveGestures = [Pan, LongTap, DoubleTap]
    DataDetectorTypes = []
    Lines.Strings = (
      'ACTION_PICK'
      '  Delphi'#22270#24211#40664#35748#29992#30340#26041#24335#65292#21487#20197#36873#21462' '#25991#20214#65292#22270#29255#65292#35270#39057#65292#38899#39057#65292#32852#31995#20154#65292#31561#31561
      '  Delphi'#40664#35748#30340#34892#20026#37324#65292#33719#21462#25991#20214#22320#22336#21644#20869#23481#26159#38752#28040#24687#30340#12290
      '  '#27880#24847#65306'Delphi'#30340#33719#21462#22320#22336#30340#28040#24687#65292#22320#22336#26159#26412#22320#30340#65292#20063#23601#26159#35828#20182#20808#25335#36125#20102#25968#25454#22312#33258#24049#30340#32531#23384#21306#20570#20102#23384#20648
      ''
      'ACTION_GET_CONTENT'
      '  '#36739#20026#36890#29992#30340#36873#21462#26041#24335
      ''
      'ACTION_OPEN_DOCUMENT'
      '  '#26032#24335#36873#21462#26041#24335#65292#20294#37096#20998'URI'#26080#27861#36716#25104#25991#20214#36335#24452#65292#36825#20010#26102#20505#23601#21482#33021#26159#33719#21462#25991#20214#25968#25454#20102
      '  '#22914#65306#31995#32479#19979#36733#30446#24405#65292#23433#21331'10'#24320#22987#30340#25152#26377#25991#26723#31867#22411#30446#24405
      ''
      #20851#20110#22810#36873
      '  ACTION_PICK '#23433#21331'4.4'#19981#25903#25345#22810#36873#65292#20294#23433#21331'10'#21487#20197#65292#20854#20182#29256#26412#26242#26410#27979#35797
      '  '#26377#20123#25163#26426#22810#36873#38656#35201#20320#20808#38271#25353#20854#20013#19968#20010#25991#20214#25165#20250#20986#29616#22810#36873#26694
      ''
      #20851#20110#26435#38480
      '  '#23433#21331'10'#30340#26102#20505#65292'ACTION_PICK '#27809#26377#36816#34892#26102#30340#23384#20648#26435#38480#20063#21487#20197#33719#21462#22320#22336#65292#20854#20182#20004#20010#19981#34892
      '')
    TextSettings.WordWrap = True
    Anchors = [akLeft, akTop, akRight, akBottom]
    Position.Y = 186.000000000000000000
    Size.Width = 383.000000000000000000
    Size.Height = 294.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 0
    Viewport.Width = 363.000000000000000000
    Viewport.Height = 290.000000000000000000
  end
  object btn1: TButton
    Anchors = [akLeft, akTop, akRight]
    Position.X = 10.000000000000000000
    Position.Y = 44.000000000000000000
    Size.Width = 361.000000000000000000
    Size.Height = 28.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 2
    Text = 'ACTION_PICK'
    OnClick = btn1Click
  end
  object btn2: TButton
    Anchors = [akLeft, akTop, akRight]
    Position.X = 10.000000000000000000
    Position.Y = 83.000000000000000000
    Size.Width = 361.000000000000000000
    Size.Height = 28.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 4
    Text = 'ACTION_GET_CONTENT'
    OnClick = btn2Click
  end
  object btn3: TButton
    Anchors = [akLeft, akTop, akRight]
    Position.X = 10.000000000000000000
    Position.Y = 122.000000000000000000
    Size.Width = 361.000000000000000000
    Size.Height = 28.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 3
    Text = 'ACTION_OPEN_DOCUMENT'
    OnClick = btn3Click
  end
  object btn4: TButton
    Anchors = [akLeft, akTop, akRight]
    Position.X = 10.000000000000000000
    Position.Y = 6.000000000000000000
    Size.Width = 361.000000000000000000
    Size.Height = 28.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 1
    Text = 'FMXMediaLibrary.takeImageFromLibrary'
    OnClick = btn4Click
  end
  object chkAllowMultiSelect: TCheckBox
    Position.X = 11.000000000000000000
    Position.Y = 161.000000000000000000
    Size.Width = 358.000000000000000000
    Size.Height = 19.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 5
    Text = 'chkAllowMultiSelect'
  end
end