ctrls.dfm

rx library V2.7.7a component use in delphi7 to delphi 2006

        end
        object rxSwitch1: TRxSwitch
          Left = 12
          Top = 44
          Width = 77
          Height = 77
          Caption = 'On'
          Color = clBtnFace
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentColor = False
          ParentFont = False
          StateOn = True
          TabOrder = 0
          TextPosition = tpRight
          OnOn = rxSwitchOn
          OnOff = rxSwitch1Off
        end
        object ComboBox4: TComboBox
          Left = 112
          Top = 48
          Width = 125
          Height = 21
          Style = csDropDownList
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 13
          Items.Strings = (
            'None'
            'Left'
            'Right'
            'Above'
            'Below')
          ParentFont = False
          TabOrder = 1
          OnChange = ComboBox4Change
        end
        object ComboBox5: TComboBox
          Left = 112
          Top = 92
          Width = 125
          Height = 21
          Style = csDropDownList
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 13
          Items.Strings = (
            'Switch.VBX'
            'After Dark')
          ParentFont = False
          TabOrder = 2
          OnChange = ComboBox5Change
        end
        object CheckBox5: TCheckBox
          Left = 112
          Top = 132
          Width = 97
          Height = 17
          Caption = 'Show Border'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          OnClick = CheckBox5Click
        end
      end
    end
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Edits'
      object GroupBox5: TGroupBox
        Left = 4
        Top = 0
        Width = 241
        Height = 60
        Caption = ' ComboEdit '
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object Label13: TLabel
          Left = 9
          Top = 14
          Width = 197
          Height = 13
          Caption = 'Edit Box with a button (for special actions)'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
          WordWrap = True
        end
        object ComboEdit1: TComboEdit
          Left = 8
          Top = 33
          Width = 225
          Height = 21
          ButtonHint = 'Special action...|'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          GlyphKind = gkEllipsis
          MaxLength = 0
          NumGlyphs = 1
          ParentFont = False
          TabOrder = 0
          OnButtonClick = ComboEdit1ButtonClick
        end
      end
      object GroupBox6: TGroupBox
        Left = 248
        Top = 0
        Width = 241
        Height = 77
        Caption = ' DateEdit and CalcEdit '
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        object Label14: TLabel
          Left = 8
          Top = 16
          Width = 225
          Height = 33
          AutoSize = False
          Caption = 
            'Provide masked typing and brings up calendar or calculator on bu' +
            'tton click'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
          WordWrap = True
        end
        object DateEdit1: TDateEdit
          Left = 8
          Top = 48
          Width = 93
          Height = 21
          ButtonHint = 'Calendar|'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          NumGlyphs = 2
          ParentFont = False
          TabOrder = 0
        end
        object RxCalcEdit1: TRxCalcEdit
          Left = 112
          Top = 48
          Width = 121
          Height = 21
          AutoSize = False
          ButtonHint = 'Calculator|'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          NumGlyphs = 2
          ParentFont = False
          TabOrder = 1
        end
      end
      object GroupBox7: TGroupBox
        Left = 4
        Top = 60
        Width = 241
        Height = 61
        Caption = ' FileNameEdit '
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        object Label15: TLabel
          Left = 8
          Top = 14
          Width = 161
          Height = 13
          Caption = 'Direct typing or call to OpenDialog'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
          WordWrap = True
        end
        object FilenameEdit1: TFilenameEdit
          Left = 8
          Top = 33
          Width = 225
          Height = 21
          Filter = 'Pascal sources (*.pas)|*.pas|All files (*.*)|*.*'
          ButtonHint = 'Browse...|'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          NumGlyphs = 1
          ParentFont = False
          TabOrder = 0
        end
      end
      object GroupBox8: TGroupBox
        Left = 248
        Top = 80
        Width = 241
        Height = 65
        Caption = ' DirectoryEdit '
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        object Label16: TLabel
          Left = 8
          Top = 16
          Width = 165
          Height = 13
          AutoSize = False
          Caption = 'Direct typing or Browse'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
        end
        object DirectoryEdit1: TDirectoryEdit
          Left = 8
          Top = 36
          Width = 224
          Height = 21
          ButtonHint = 'Browse...|'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          NumGlyphs = 1
          ParentFont = False
          TabOrder = 0
        end
      end
      object GroupBox9: TGroupBox
        Left = 4
        Top = 121
        Width = 241
        Height = 79
        Caption = ' CurrencyEdit '
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        object Label17: TLabel
          Left = 8
          Top = 14
          Width = 157
          Height = 13
          Caption = 'Edit Box for moneys and numbers'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
          WordWrap = True
        end
        object Label22: TLabel
          Left = 116
          Top = 37
          Width = 45
          Height = 13
          AutoSize = False
          Caption = 'Format:'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object CurrencyEdit1: TCurrencyEdit
          Left = 8
          Top = 33
          Width = 97
          Height = 20
          AutoSize = False
          DisplayFormat = ',0.00;-,0.00'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
        end
        object Edit1: TEdit
          Left = 164
          Top = 33
          Width = 69
          Height = 20
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          Text = ',0.00;-,0.00'
          OnChange = Edit1Change
        end
        object CheckBox7: TCheckBox