object frmBaseSwDialog: TfrmBaseSwDialog Left = 284 Top = 120 BorderIcons = [biSystemMenu] Caption = 'UnitSwitcher' ClientHeight = 389 ClientWidth = 304 Color = clBtnFace Constraints.MinHeight = 240 Constraints.MinWidth = 290 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] Icon.Data = { 0000010001001010100001000400280100001600000028000000100000002000 0000010004000000000080000000000000000000000000000000000000000000 000000008000008000000080800080000000800080008080000080808000C0C0 C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000 0000000000000000F777777777700000FF8F8F8F8F700000F8F8F8F8F8700000 FF0000000F700000F8F8F8F8F8700000F999999999700400F9FFFFFFF9700000 F999999999700000F8F8F8F8F8700000FF0000008F700000F8F8F8F8F7700000 FF00008F00000000F8F8F8F80F000000FFFFFFFF00000000000000000000E000 0000E0000000E0000000E0000000E00000006000000020000000000000002000 000060000000E0000000E0000000E0000000E0010000E0030000E0070000} OldCreateOrder = False Position = poScreenCenter OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object sbStatus: TStatusBar Left = 0 Top = 370 Width = 304 Height = 19 Panels = < item Width = 50 end> end object pnlMain: TPanel Left = 0 Top = 0 Width = 304 Height = 334 Align = alClient BevelOuter = bvNone BorderWidth = 4 TabOrder = 0 object pnlSearch: TPanel Left = 4 Top = 24 Width = 296 Height = 25 Align = alTop BevelOuter = bvNone TabOrder = 0 DesignSize = ( 296 25) object cmbSearch: TComboBox Left = 0 Top = 0 Width = 304 Height = 21 AutoComplete = False Anchors = [akLeft, akTop, akRight] DropDownCount = 10 ItemHeight = 13 TabOrder = 0 OnChange = cmbSearchChange OnKeyDown = cmbSearchKeyDown OnKeyPress = cmbSearchKeyPress end end object lstItems: TListBox Left = 4 Top = 49 Width = 296 Height = 281 Style = lbVirtualOwnerDraw Align = alClient ItemHeight = 20 MultiSelect = True PopupMenu = pmnItems TabOrder = 1 OnClick = lstItemsClick OnData = lstItemsData OnDblClick = lstItemsDblClick OnDrawItem = lstItemsDrawItem OnMouseDown = lstItemsMouseDown end object pnlSubFilters: TPanel Left = 4 Top = 4 Width = 296 Height = 20 Align = alTop BevelOuter = bvNone TabOrder = 2 Visible = False DesignSize = ( 296 20) object lblSubFilters: TLabel Left = 0 Top = 1 Width = 305 Height = 13 Anchors = [akLeft, akTop, akRight] AutoSize = False Caption = 'frm '#187' Dialog '#187 end end end object pnlButtons: TPanel Left = 0 Top = 334 Width = 304 Height = 36 Align = alBottom BevelOuter = bvNone TabOrder = 1 DesignSize = ( 304 36) object btnCancel: TButton Left = 233 Top = 5 Width = 75 Height = 25 Anchors = [akRight, akBottom] Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 1 end object btnOK: TButton Left = 152 Top = 5 Width = 75 Height = 25 Anchors = [akRight, akBottom] Caption = 'OK' Default = True TabOrder = 0 OnClick = btnOKClick end end object ilsTypes: TImageList Left = 28 Top = 228 end object alMain: TActionList Left = 84 Top = 228 object actSelectAll: TAction Caption = 'Select &All' ShortCut = 16449 OnExecute = actSelectAllExecute end object actSelectInvert: TAction Caption = '&Invert Selection' ShortCut = 16457 OnExecute = actSelectInvertExecute end object actMRUPrior: TAction Caption = 'actMRUPrior' ShortCut = 16422 OnExecute = actMRUPriorExecute end object actMRUNext: TAction Caption = 'actMRUNext' ShortCut = 16424 OnExecute = actMRUNextExecute end end object pmnItems: TPopupMenu Left = 140 Top = 228 object pmnItemsSelectAll: TMenuItem Action = actSelectAll end object pmnItemsSelectInvert: TMenuItem Action = actSelectInvert end end end