object frmSelect: TfrmSelect Left = 266 Top = 118 HelpContext = 77 ActiveControl = txtName BorderStyle = bsDialog Caption = 'Select' ClientHeight = 274 ClientWidth = 371 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True Position = poScreenCenter OnActivate = FormActivate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 353 Height = 229 Shape = bsFrame IsControl = True end object lblName: TLabel Left = 20 Top = 28 Width = 28 Height = 13 Caption = '&Name' FocusControl = txtName end object lblSize: TLabel Left = 20 Top = 56 Width = 20 Height = 13 Caption = '&Size' FocusControl = txtSize end object lblOptions: TLabel Left = 20 Top = 84 Width = 36 Height = 13 Caption = '&Options' FocusControl = sgOptions end object OKBtn: TBitBtn Left = 116 Top = 244 Width = 77 Height = 25 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 4 NumGlyphs = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 200 Top = 244 Width = 77 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 5 NumGlyphs = 2 Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 284 Top = 244 Width = 77 Height = 25 Caption = '&Help' TabOrder = 6 OnClick = HelpBtnClick NumGlyphs = 2 Spacing = -1 IsControl = True end object txtName: TEdit Left = 80 Top = 24 Width = 265 Height = 21 Hint = 'Name of the selection list' ParentShowHint = False ShowHint = True TabOrder = 0 end object txtSize: TMaskEdit Left = 80 Top = 52 Width = 45 Height = 21 Hint = 'Height of the selection list' MaxLength = 0 ParentShowHint = False ShowHint = True TabOrder = 1 OnKeyPress = txtSizeKeyPress end object chkMultiple: TCheckBox Left = 164 Top = 56 Width = 121 Height = 17 Hint = 'Allows multiple options to be selected' Caption = '&Multiple' ParentShowHint = False ShowHint = True TabOrder = 2 end object sgOptions: TStringGrid Left = 20 Top = 104 Width = 329 Height = 120 ColCount = 1 DefaultColWidth = 313 DefaultRowHeight = 19 FixedCols = 0 RowCount = 500 FixedRows = 0 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goEditing, goAlwaysShowEditor, goThumbTracking] ParentFont = False TabOrder = 3 end end