object DBSetupForm4: TDBSetupForm4 Left = 162 Top = 105 BorderIcons = [] BorderStyle = bsDialog Caption = 'Parameters' ClientHeight = 217 ClientWidth = 409 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 Position = poScreenCenter Scaled = False OnActivate = FormActivate TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 393 Height = 153 end object Label1: TLabel Tag = 1000 Left = 200 Top = 60 Width = 73 Height = 13 AutoSize = False Caption = 'Value' end object Label2: TLabel Tag = 1001 Left = 200 Top = 28 Width = 73 Height = 21 AutoSize = False Caption = 'Datatype' end object ListBox1: TListBox Left = 16 Top = 24 Width = 169 Height = 121 ItemHeight = 13 TabOrder = 0 OnClick = ListBox1Click end object ComboBox1: TComboBox Left = 272 Top = 24 Width = 121 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( 'BCD' 'Boolean' 'Curreny' 'Date' 'DateTime' 'Integer' 'Float' 'Smallint' 'String' 'Time' 'Word') TabOrder = 1 OnChange = ComboBox1Change end object Edit1: TEdit Left = 272 Top = 56 Width = 121 Height = 20 TabOrder = 2 OnChange = Edit1Change OnExit = Edit1Exit end object CheckBox2: TCheckBox Tag = 1002 Left = 200 Top = 112 Width = 193 Height = 17 Caption = 'ask for value when printing' TabOrder = 3 OnClick = CheckBox2Click end object BitBtn1: TBitBtn Tag = 1003 Left = 160 Top = 176 Width = 89 Height = 33 TabOrder = 4 Kind = bkOK end end