unit1.lfm

object Form1: TForm1
  Left = 426
  Height = 277
  Top = 137
  Width = 352
  ActiveControl = CheckBoxThemed1
  AlphaBlend = True
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Dec to Bin Converter'
  ClientHeight = 277
  ClientWidth = 352
  OnCreate = FormCreate
  ParentBiDiMode = False
  Position = poDesktopCenter
  LCLVersion = '2.0.10.0'
  object EditASCII: TEdit
    Left = 83
    Height = 28
    Top = 216
    Width = 183
    ReadOnly = True
    TabOrder = 0
    TextHint = '(temporarily not working)'
    Visible = False
  end
  object EditDec: TEdit
    Left = 83
    Height = 28
    Top = 56
    Width = 183
    NumbersOnly = True
    OnKeyPress = EditDecKeyPress
    OnKeyUp = EditDecKeyUp
    TabOrder = 1
  end
  object EditOct: TEdit
    Left = 83
    Height = 28
    Top = 96
    Width = 183
    NumbersOnly = True
    OnKeyPress = EditOctKeyPress
    OnKeyUp = EditOctKeyUp
    TabOrder = 2
  end
  object EditHex: TEdit
    Left = 83
    Height = 28
    Top = 136
    Width = 183
    OnKeyPress = EditHexKeyPress
    OnKeyUp = EditHexKeyUp
    TabOrder = 3
  end
  object EditBin: TEdit
    Left = 83
    Height = 28
    Top = 176
    Width = 183
    NumbersOnly = True
    OnKeyPress = EditBinKeyPress
    OnKeyUp = EditBinKeyUp
    TabOrder = 4
  end
  object LabelASCII: TLabel
    Left = 16
    Height = 18
    Top = 218
    Width = 41
    Caption = 'ASCII:'
    Font.CharSet = RUSSIAN_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = 'Segoe UI'
    Font.Pitch = fpVariable
    Font.Quality = fqDraft
    ParentColor = False
    ParentFont = False
    Visible = False
  end
  object LabelDec: TLabel
    Left = 27
    Height = 18
    Top = 56
    Width = 30
    Caption = 'Dec:'
    Font.CharSet = RUSSIAN_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = 'Segoe UI'
    Font.Pitch = fpVariable
    Font.Quality = fqDraft
    ParentColor = False
    ParentFont = False
  end
  object LabelOct: TLabel
    Left = 29
    Height = 18
    Top = 96
    Width = 29
    Caption = 'Oct:'
    Font.CharSet = RUSSIAN_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = 'Segoe UI'
    Font.Pitch = fpVariable
    Font.Quality = fqDraft
    ParentColor = False
    ParentFont = False
  end
  object LabelHex: TLabel
    Left = 27
    Height = 18
    Top = 136
    Width = 32
    Caption = 'Hex:'
    Font.CharSet = RUSSIAN_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = 'Segoe UI'
    Font.Pitch = fpVariable
    Font.Quality = fqDraft
    ParentColor = False
    ParentFont = False
  end
  object LabelBin: TLabel
    Left = 31
    Height = 18
    Top = 176
    Width = 27
    Caption = 'Bin:'
    Font.CharSet = RUSSIAN_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = 'Segoe UI'
    Font.Pitch = fpVariable
    Font.Quality = fqDraft
    ParentColor = False
    ParentFont = False
  end
  object ScrollAlpha: TScrollBar
    Left = 72
    Height = 13
    Top = 14
    Width = 136
    DoubleBuffered = False
    Max = 255
    Min = 100
    PageSize = 0
    ParentBidiMode = False
    ParentDoubleBuffered = False
    Position = 255
    TabOrder = 5
    OnChange = ScrollAlphaChange
  end
  object ABtnCopy: TBitBtn
    Left = 283
    Height = 24
    Top = 216
    Width = 51
    Caption = 'Copy'
    Font.Height = -13
    Font.Name = 'Sans'
    OnClick = ABtnCopyClick
    ParentFont = False
    TabOrder = 6
    Visible = False
  end
  object DBtnCopy: TBitBtn
    Left = 283
    Height = 24
    Top = 56
    Width = 51
    Caption = 'Copy'
    Font.Height = -13
    Font.Name = 'Sans'
    OnClick = DBtnCopyClick
    ParentFont = False
    TabOrder = 7
  end
  object OBtnCopy: TBitBtn
    Left = 283
    Height = 24
    Top = 96
    Width = 51
    Caption = 'Copy'
    Font.Height = -13
    Font.Name = 'Sans'
    OnClick = OBtnCopyClick
    ParentFont = False
    TabOrder = 8
  end
  object HBtnCopy: TBitBtn
    Left = 283
    Height = 24
    Top = 136
    Width = 51
    Caption = 'Copy'
    Font.Height = -13
    Font.Name = 'Sans'
    OnClick = HBtnCopyClick
    ParentFont = False
    TabOrder = 9
  end
  object BBtnCopy: TBitBtn
    Left = 283
    Height = 24
    Top = 176
    Width = 51
    Caption = 'Copy'
    Font.Height = -13
    Font.Name = 'Sans'
    OnClick = BBtnCopyClick
    ParentFont = False
    TabOrder = 10
  end
  object CheckBoxThemed1: TCheckBoxThemed
    Left = 224
    Height = 19
    Top = 10
    Width = 118
    Caption = 'Fix the window'
    Font.Height = -13
    Font.Name = 'Sans'
    ParentFont = False
    TabOrder = 11
    OnChange = CheckBoxThemed1Change
  end
  object LabelAlpha: TLabel
    Left = 20
    Height = 15
    Top = 12
    Width = 41
    Caption = 'Alpha:'
    Font.CharSet = RUSSIAN_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'Sans'
    Font.Pitch = fpVariable
    Font.Quality = fqDraft
    ParentColor = False
    ParentFont = False
  end
  object LabelCopyright: TLabel
    Left = 0
    Height = 15
    Top = 228
    Width = 352
    Align = alBottom
    Alignment = taCenter
    BorderSpacing.Bottom = 6
    Caption = 'Copyright (C) Usevalad Khatkevich'
    Font.Height = -13
    Font.Name = 'Sans'
    ParentColor = False
    ParentFont = False
  end
  object LabelLink: TLabel
    Cursor = crHandPoint
    Left = 96
    Height = 15
    Top = 249
    Width = 174
    Align = alBottom
    BorderSpacing.Left = 96
    BorderSpacing.Right = 82
    BorderSpacing.Bottom = 13
    Caption = 'https://github.com/SEVA77'
    Color = clForm
    Font.Height = -13
    Font.Name = 'Sans'
    ParentBidiMode = False
    ParentColor = False
    ParentFont = False
    Transparent = False
    OnClick = LabelLinkClick
  end
  object LabelVer: TLabel
    Cursor = crHandPoint
    Left = 292
    Height = 15
    Top = 262
    Width = 60
    Caption = 'ver. 0.0.1'
    Font.Height = -13
    Font.Name = 'Sans'
    ParentColor = False
    ParentFont = False
    OnClick = LabelVerClick
  end
end