paramtype.lfm

devent UniDAC 2.003 include sources

object ParamTypeForm: TParamTypeForm
  Left = 331
  Height = 284
  Top = 149
  Width = 336
  HorzScrollBar.Page = 335
  HorzScrollBar.Range = 311
  VertScrollBar.Page = 283
  VertScrollBar.Range = 199
  ActiveControl = btClose
  BorderStyle = bsToolWindow
  Caption = 'Parameters information'
  ClientHeight = 284
  ClientWidth = 336
  Font.Height = 11
  Font.Name = 'Tahoma'
  Font.Pitch = fpVariable
  OnShow = FormShow
  object Panel1: TPanel
    Left = 10
    Height = 272
    Top = 10
    Width = 322
    BevelOuter = bvNone
    ClientHeight = 272
    ClientWidth = 322
    ParentColor = False
    TabOrder = 0
    object Panel5: TPanel
      Left = 167
      Height = 48
      Top = 223
      Width = 154
      BevelOuter = bvNone
      ClientHeight = 48
      ClientWidth = 154
      TabOrder = 0
      object btClose: TButton
        Left = 37
        Height = 27
        Top = 11
        Width = 81
        Caption = 'Close'
        OnClick = btCloseClick
        TabOrder = 0
      end
    end
    object Panel6: TPanel
      Left = 167
      Height = 141
      Top = 1
      Width = 154
      BevelOuter = bvNone
      ClientHeight = 141
      ClientWidth = 154
      TabOrder = 1
      object Label2: TLabel
        Left = 10
        Height = 14
        Top = 5
        Width = 49
        Caption = 'Data type'
        Color = clBtnFace
        ParentColor = False
        Transparent = False
      end
      object rgTypes: TRadioGroup
        Left = 5
        Height = 113
        Top = 20
        Width = 144
        AutoFill = True
        ChildSizing.LeftRightSpacing = 6
        ChildSizing.TopBottomSpacing = 6
        ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
        ChildSizing.EnlargeVertical = crsHomogenousChildResize
        ChildSizing.ShrinkHorizontal = crsScaleChilds
        ChildSizing.ShrinkVertical = crsScaleChilds
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 1
        ClientHeight = 95
        ClientWidth = 140
        Items.Strings = (
          'String'
          'Integer'
          'Float'
          'Date'
        )
        OnClick = rgTypesClick
        TabOrder = 0
      end
    end
    object Panel7: TPanel
      Left = 1
      Height = 270
      Top = 1
      Width = 165
      BevelOuter = bvNone
      ClientHeight = 270
      ClientWidth = 165
      ParentColor = False
      TabOrder = 2
      object Label1: TLabel
        Left = 10
        Height = 14
        Top = 5
        Width = 56
        Caption = 'Parameters'
        Color = clBtnFace
        ParentColor = False
        Transparent = False
      end
      object lbParams: TListBox
        Left = 5
        Height = 239
        Top = 20
        Width = 155
        ItemHeight = 13
        OnClick = lbParamsClick
        TabOrder = 0
      end
    end
    object Panel3: TPanel
      Left = 167
      Height = 52
      Top = 170
      Width = 154
      BevelOuter = bvNone
      ClientHeight = 52
      ClientWidth = 154
      TabOrder = 3
      object lbValue: TLabel
        Left = 10
        Height = 13
        Top = 5
        Width = 27
        Caption = 'Value'
        Color = clBtnFace
        ParentColor = False
        Transparent = False
      end
      object edParamValue: TEdit
        Left = 5
        Height = 21
        Top = 20
        Width = 144
        OnExit = edParamValueExit
        TabOrder = 0
      end
    end
    object Panel2: TPanel
      Left = 167
      Height = 26
      Top = 143
      Width = 154
      BevelOuter = bvNone
      ClientHeight = 26
      ClientWidth = 154
      ParentFont = True
      TabOrder = 4
      object Label3: TLabel
        Left = 10
        Height = 13
        Top = 5
        Width = 74
        Caption = 'Parameter type:'
        Color = clBtnFace
        ParentColor = False
        Transparent = False
      end
      object lbParameterType: TLabel
        Left = 89
        Height = 13
        Top = 5
        Width = 3
        Color = clBtnFace
        ParentColor = False
        Transparent = False
      end
    end
  end
end