object Form1: TForm1
  Left = 484
  Height = 442
  Top = 322
  Width = 824
  Caption = 'QR code demo'
  ClientHeight = 442
  ClientWidth = 824
  LCLVersion = '1.7'
  object QRCode1: TQRCode
    AnchorSideLeft.Control = Label2
    AnchorSideTop.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 412
    Height = 442
    Top = 0
    Width = 412
    CornerLine = 0
    Background = clWhite
    Foreground = clBlack
    Text = 'Hello world!'
  end
  object Edit1: TEdit
    AnchorSideLeft.Control = Label1
    AnchorSideTop.Control = Label1
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = Label2
    Left = 12
    Height = 37
    Top = 32
    Width = 394
    Anchors = [akTop, akLeft, akRight]
    BorderSpacing.Around = 6
    OnChange = Edit1Change
    TabOrder = 0
    Text = 'Hello world!'
  end
  object Label1: TLabel
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Owner
    Left = 6
    Height = 20
    Top = 6
    Width = 84
    BorderSpacing.Around = 6
    Caption = 'Encoded text'
    ParentColor = False
  end
  object Label2: TLabel
    AnchorSideLeft.Control = Owner
    AnchorSideLeft.Side = asrCenter
    AnchorSideTop.Control = Owner
    Left = 412
    Height = 1
    Top = 0
    Width = 1
    ParentColor = False
  end
  object Label3: TLabel
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Edit1
    AnchorSideTop.Side = asrBottom
    Left = 6
    Height = 20
    Top = 75
    Width = 58
    BorderSpacing.Around = 6
    Caption = 'Encoding'
    ParentColor = False
  end
  object ComboBox1: TComboBox
    AnchorSideLeft.Control = Label3
    AnchorSideTop.Control = Label3
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = Label2
    Left = 12
    Height = 36
    Top = 101
    Width = 394
    Anchors = [akTop, akLeft, akRight]
    BorderSpacing.Around = 6
    ItemHeight = 0
    ItemIndex = 0
    Items.Strings = (
      'Auto'
      'Numeric'
      'AlphaNumeric'
      '8BitqreUTF8_NoBom'
      'UTF8_Bom'
      'URL'
      'WIN1251'
    )
    OnChange = ComboBox1Change
    Style = csDropDownList
    TabOrder = 1
    Text = 'Auto'
  end
end
