unitconverter.dfm

Metric Converter is an useful tool for metric conversion, weight conversion, area conversion, mass c

          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          TabOrder = 1
          Text = '0'
        end
        object UpDown1: TUpDown
          Left = 160
          Top = 21
          Width = 17
          Height = 25
          Max = 14
          Position = 2
          TabOrder = 2
          OnChangingEx = UpDown1ChangingEx
        end
        object UpDown2: TUpDown
          Left = 390
          Top = 21
          Width = 17
          Height = 25
          Anchors = [akTop, akRight]
          Max = 14
          Position = 2
          TabOrder = 3
          Thousands = False
          OnChangingEx = UpDown2ChangingEx
        end
      end
      object AddFunPanel: TPanel
        Left = 1
        Top = 27
        Width = 416
        Height = 74
        Align = alTop
        TabOrder = 2
        Visible = False
        object ToolBar1: TToolBar
          Left = 1
          Top = 45
          Width = 414
          Height = 28
          Align = alBottom
          AutoSize = True
          ButtonWidth = 58
          Caption = 'ToolBar1'
          EdgeBorders = [ebLeft, ebTop, ebRight, ebBottom]
          Images = ImageList1
          List = True
          ShowCaptions = True
          TabOrder = 0
          object tbAdd: TToolButton
            Left = 0
            Top = 2
            Hint = 'Add Standard Function'
            Caption = 'Add'
            ImageIndex = 14
            ParentShowHint = False
            ShowHint = True
            OnClick = tbAddClick
          end
          object ToolButton5: TToolButton
            Left = 58
            Top = 2
            Hint = 'Delete Function'
            Caption = 'Delete'
            ImageIndex = 1
            ParentShowHint = False
            ShowHint = True
            OnClick = ToolButton8Click
          end
          object ToolButton3: TToolButton
            Left = 116
            Top = 2
            Hint = 'Sort List'
            Caption = 'Sort'
            ImageIndex = 16
            ParentShowHint = False
            ShowHint = True
            OnClick = tbSortListClick
          end
          object tbSave: TToolButton
            Left = 174
            Top = 2
            Hint = 'Save List'
            Caption = 'Save'
            ImageIndex = 15
            ParentShowHint = False
            ShowHint = True
            OnClick = tbSaveClick
          end
        end
        object Panel3: TPanel
          Left = 1
          Top = 1
          Width = 414
          Height = 44
          Align = alClient
          BevelInner = bvLowered
          TabOrder = 1
          DesignSize = (
            414
            44)
          object Label2: TLabel
            Left = 7
            Top = 6
            Width = 24
            Height = 13
            Caption = 'From'
          end
          object Label3: TLabel
            Left = 123
            Top = 6
            Width = 12
            Height = 13
            Caption = 'To'
          end
          object Label1: TLabel
            Left = 239
            Top = 6
            Width = 31
            Height = 13
            Caption = 'Factor'
          end
          object ED1: TEdit
            Left = 7
            Top = 19
            Width = 110
            Height = 21
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = []
            ParentFont = False
            TabOrder = 0
            Text = 'Feet'
          end
          object ED2: TEdit
            Left = 123
            Top = 19
            Width = 110
            Height = 21
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = []
            ParentFont = False
            TabOrder = 1
            Text = 'Metres'
          end
          object ED3: TEdit
            Left = 239
            Top = 19
            Width = 110
            Height = 21
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = []
            ParentFont = False
            TabOrder = 2
            Text = '0.3048'
          end
          object cbEdit: TCheckBox
            Left = 355
            Top = 19
            Width = 66
            Height = 22
            Hint = 'Allow Manual Edit'
            Anchors = [akTop, akRight]
            Caption = 'Manual'
            ParentShowHint = False
            ShowHint = True
            TabOrder = 3
            OnClick = cbEditClick
          end
        end
      end
      object ListBox1: TListBox
        Left = 392
        Top = 152
        Width = 41
        Height = 1
        ItemHeight = 13
        TabOrder = 3
      end
      object VLE1: TValueListEditor
        Left = 1
        Top = 101
        Width = 416
        Height = 134
        Align = alClient
        DisplayOptions = []
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        KeyOptions = [keyEdit, keyAdd, keyDelete, keyUnique]
        Options = [goFixedVertLine, goFixedHorzLine, goColSizing, goEditing, goTabs, goRowSelect, goThumbTracking]
        ParentFont = False
        Strings.Strings = (
          'Feet To Metres=0.3048'
          'Gegabytes To Bytes=1073741824.0')
        TabOrder = 4
        TitleCaptions.Strings = (
          'Function'
          'Factor')
        OnClick = VLE1Click
        ColWidths = (
          277
          205)
      end
      object Panel5: TPanel
        Left = 1
        Top = 235
        Width = 416
        Height = 35
        Align = alBottom
        TabOrder = 5
        Visible = False
        object Label5: TLabel
          Left = 10
          Top = 10
          Width = 33
          Height = 13
          Caption = 'Search'
        end
        object eSearch: TEdit
          Left = 62
          Top = 6
          Width = 150
          Height = 21
          TabOrder = 0
          OnChange = eSearchChange
        end
      end