object MapForm: TMapForm Left = 0 Top = 0 ActiveControl = vstMap BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Map' ClientHeight = 540 ClientWidth = 577 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False Position = poOwnerFormCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object pnlButtons: TPanel AlignWithMargins = True Left = 8 Top = 507 Width = 561 Height = 25 Margins.Left = 8 Margins.Top = 0 Margins.Right = 8 Margins.Bottom = 8 Align = alBottom AutoSize = True BevelOuter = bvNone TabOrder = 3 ExplicitTop = 91 ExplicitWidth = 503 object btnCancel: TButton Left = 486 Top = 0 Width = 75 Height = 25 Align = alRight Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 1 ExplicitLeft = 428 end object btnOK: TButton AlignWithMargins = True Left = 403 Top = 0 Width = 75 Height = 25 Margins.Left = 0 Margins.Top = 0 Margins.Right = 8 Margins.Bottom = 0 Align = alRight Caption = 'OK' Default = True TabOrder = 0 OnClick = btnOKClick ExplicitLeft = 345 end end object vstMap: TVirtualStringTree AlignWithMargins = True Left = 8 Top = 37 Width = 561 Height = 433 Margins.Left = 8 Margins.Top = 8 Margins.Right = 8 Margins.Bottom = 8 Align = alClient Header.AutoSizeIndex = 0 Header.Font.Charset = DEFAULT_CHARSET Header.Font.Color = clWindowText Header.Font.Height = -11 Header.Font.Name = 'Tahoma' Header.Font.Style = [] Header.MainColumn = -1 TabOrder = 1 TreeOptions.PaintOptions = [toHideFocusRect, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages] TreeOptions.SelectionOptions = [toFullRowSelect] OnCollapsing = vstMapCollapsing OnCompareNodes = vstMapCompareNodes OnFocusChanged = vstMapFocusChanged OnFocusChanging = vstMapFocusChanging OnGetText = vstMapGetText OnPaintText = vstMapPaintText ExplicitTop = 13 ExplicitHeight = 457 Columns = <> end object pnlMapName: TPanel AlignWithMargins = True Left = 8 Top = 478 Width = 561 Height = 21 Margins.Left = 8 Margins.Top = 0 Margins.Right = 8 Margins.Bottom = 8 Align = alBottom AutoSize = True BevelOuter = bvNone TabOrder = 2 ExplicitTop = 468 ExplicitWidth = 689 DesignSize = ( 561 21) object lblMapName: TLabel Left = 0 Top = 3 Width = 53 Height = 13 Caption = 'Map name:' end object edtMapName: TEdit Left = 76 Top = 0 Width = 485 Height = 21 Anchors = [akLeft, akTop, akRight] TabOrder = 0 OnChange = edtMapNameChange ExplicitWidth = 613 end end object pnlFilter: TPanel AlignWithMargins = True Left = 8 Top = 8 Width = 561 Height = 21 Margins.Left = 8 Margins.Top = 8 Margins.Right = 8 Margins.Bottom = 0 Align = alTop AutoSize = True BevelOuter = bvNone TabOrder = 0 ExplicitLeft = 12 ExplicitTop = 482 DesignSize = ( 561 21) object lblFilter: TLabel Left = 0 Top = 3 Width = 28 Height = 13 Caption = 'Filter:' end object edtFilter: TEdit Left = 76 Top = 0 Width = 485 Height = 21 Anchors = [akLeft, akTop, akRight] TabOrder = 0 OnChange = edtFilterChange end end end