object FieldsListFrm: TFieldsListFrm Left = 414 Height = 280 Top = 116 Width = 195 ActiveControl = BitBtnOk Caption = 'FieldsListFrm' ClientHeight = 280 ClientWidth = 195 OnClose = FormClose OnCreate = FormCreate LCLVersion = '2.1.0.0' object BitBtnOk: TBitBtn AnchorSideBottom.Side = asrBottom Left = 9 Height = 34 Top = 241 Width = 77 Anchors = [akLeft, akBottom] AutoSize = True BorderSpacing.Around = 6 Caption = '&Create' Default = True Kind = bkOK ModalResult = 1 OnClick = BitBtnOkClick TabOrder = 0 end object BitBtnCancel: TBitBtn AnchorSideLeft.Control = BitBtnOk AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = BitBtnOk AnchorSideTop.Side = asrCenter Left = 92 Height = 34 Top = 241 Width = 76 AutoSize = True BorderSpacing.Around = 6 Cancel = True Caption = 'Cancel' Kind = bkCancel ModalResult = 2 TabOrder = 1 end object ListBox1: TListBox AnchorSideBottom.Control = BitBtnOk Left = 0 Height = 235 Top = 0 Width = 192 Anchors = [akTop, akLeft, akRight, akBottom] ItemHeight = 0 MultiSelect = True ScrollWidth = 190 TabOrder = 2 TopIndex = -1 end end