object DbExplorerForm: TDbExplorerForm Left = 356 Top = 103 Width = 510 Height = 292 HelpContext = 1000 ActiveControl = TreePanel Caption = 'Database Explorer' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu Position = poDefaultPosOnly Visible = True OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object MenuBevel: TBevel Left = 0 Top = 0 Width = 502 Height = 2 Align = alTop Shape = bsTopLine end object SpeedBar: TPanel Left = 0 Top = 2 Width = 502 Height = 29 HelpContext = 1080 Align = alTop BevelOuter = bvNone ParentShowHint = False ShowHint = True TabOrder = 3 object SBOpen: TSpeedButton Left = 2 Top = 2 Width = 26 Height = 25 Hint = 'Open' AllowAllUp = True GroupIndex = 2 Enabled = False Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555555555555555555555555555555555555555555 555555555555555555555555555555555555555FFFFFFFFFF555550000000000 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8 B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555 55555575FFF75555555555700007555555555557777555555555555555555555 55555555555555555555555555555555555555555555555555550000} NumGlyphs = 2 OnClick = PMOpenCloseClick end object SBShowAllAttrs: TSpeedButton Left = 141 Top = 2 Width = 25 Height = 25 Hint = 'Show Raw Attrs' AllowAllUp = True GroupIndex = 4 Glyph.Data = { 0E030000424D0E03000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000 000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F 00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B 0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F 0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF 00333377737FFFFF773333303300000003333337337777777333000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000006D4374726C732C204244455363680000 000000000000000000000000000000000000CCCCCCCB9999999B000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000} NumGlyphs = 2 Visible = False OnClick = SBShowAllAttrsClick end object SBViewBlobs: TSpeedButton Left = 115 Top = 2 Width = 25 Height = 25 Hint = 'Explore Blobs' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 0E030000424D0E03000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0000377777777777777707FFFFFFFFFFFF70773FF33333333F770F77FFFFFFFF 77F07F773FFFFFFF77F70FFF7700000000007F337777777777770FFFFF0BBBBB BBB07F333F7F3FF33FF70FFF700B00BB00B07F3F777F77F377370F707F0BB0B0 0BB07F77337F37F77337007EEE0BB0B0BBB077FFFF7F37F7F3370777770EE000 EEE07777777F3777F3F7307EEE0E0E00E0E03773FF7F7377F73733707F0EE000 0EE03337737F377773373333700EEE00EEE03333377F3377FF373333330EEEE0 0EE03333337F33377F373333330EEEE00EE03333337F333773373333330EEEEE EEE03333337FFFFFFFF733333300000000003333337777777777000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000074726F7926D13815671654466F720000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000003030303030300D0A202020203030 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000048444E6F746966795700 095448440000000000000000000000000000} NumGlyphs = 2 OnClick = ViewBlobsClick end object SBSave: TSpeedButton Left = 87 Top = 2 Width = 25 Height = 25 Hint = 'Apply' Enabled = False Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3443333333333333333338833333333333333333433333333333333333338333 3333333333333334333333333444444333383333333338888883334333333333 3344444333833333333333888883334333333333333444433383333333333338 8883334333333333333444433383333333333338888333433333333333433443 3383333333333383388333343333333334333343333833333333383333833333 4433333443333333333388333338833333333333334444433333333333333388 8883333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 33333333333333333333} NumGlyphs = 2 OnClick = PMSaveClick end object SBCancel: TSpeedButton Left = 62 Top = 2 Width = 25 Height = 25 Hint = 'Cancel' Enabled = False Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333331133333333333333333388333333333333333333331333333333333 3333333833333111111333333333133338888883333333338333311111333333 3333313338888833333333333833311113333333333331333888833333333333 3833311113333333333331333888833333333333383331133133333333333133 3883383333333333383331333313333333331333383333833333333383333333 3331133333113333333333388333338833333333333331111133333333333333 3888883333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 33333333333333333333} NumGlyphs = 2 OnClick = PMCancelClick end object SBDelete: TSpeedButton Left = 34 Top = 2 Width = 25 Height = 25 Hint = 'Delete' Enabled = False Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333444433333333333333338888333333333333 3333444443333333333333438888833333333333338344444333333333333433 8888833333333333383334444433333333334433388888333333333388333344 4433333333344333338888333333333883333334444333333344433333388883 3333338883333333444433333444333333338888333338883333333334444333 4443333333333888833388833333333333444434443333333333338888388833 3333333333344444433333333333333888888333333333333333444433333333 3333333388883333333333333334444443333333333333388888833333333333 3444433444333333333338888338883333333333444433334443333333338888 3333888333333344444333333344333333888883333333883333344444333333 3334433338888833333333388333444443333333333344338888833333333333 8833444433333333333333448888333333333333338844433333333333333333 88833333333333333333} NumGlyphs = 2 OnClick = PMDeleteClick end object DbNavPanel: TPanel Left = 269 Top = 0 Width = 233 Height = 29 Align = alRight BevelOuter = bvNone Ctl3D = True ParentCtl3D = False TabOrder = 0 Visible = False object DbNavigator: TDBNavigator Left = 7 Top = 2 Width = 220 Height = 25 Ctl3D = False ParentCtl3D = False TabOrder = 0 end end end object TreePanel: TPanel Left = 0 Top = 31 Width = 180 Height = 199 Align = alLeft BevelOuter = bvNone TabOrder = 0 object TreeInfoPanel: TPanel Left = 0 Top = 0 Width = 180 Height = 20 Align = alTop Alignment = taLeftJustify BevelOuter = bvLowered TabOrder = 1 object TreeInfoLine: TLabel Left = 6 Top = 3 Width = 2 Height = 11 end end object TreeDeltaPanel: TPanel Left = 0 Top = 20 Width = 180 Height = 4 Align = alTop BevelOuter = bvNone TabOrder = 2 end object TreeTabs: TTabControl Left = 0 Top = 24 Width = 180 Height = 175 Align = alClient TabIndex = 0 TabOrder = 0 Tabs.Strings = ( 'Databases' 'Dictionary') OnChanging = TreeTabsChanging object AntiUnicodeHackPanel: TPanel Left = 4 Top = 24 Width = 172 Height = 147 Align = alClient BevelOuter = bvNone Ctl3D = True ParentCtl3D = False TabOrder = 0 object DRTree: TTreeView Left = 0 Top = 0 Width = 172 Height = 147 DragMode = dmAutomatic HideSelection = False Indent = 19 OnEditing = ExplorerTreeEditing OnEdited = ExplorerTreeEdited OnExpanding = ExplorerTreeExpanding OnChange = ExplorerTreeSelect Align = alClient ParentColor = False TabOrder = 0 OnStartDrag = DbXStartDrag PopupMenu = BasePopupMenu Images = SmallImages StateImages = SmallImages end object DbTree: TTreeView Left = 0 Top = 0 Width = 172 Height = 147 DragMode = dmAutomatic HideSelection = False Indent = 19 OnEditing = ExplorerTreeEditing OnEdited = ExplorerTreeEdited OnExpanding = ExplorerTreeExpanding OnChange = ExplorerTreeSelect Align = alClient ParentColor = False TabOrder = 1 OnStartDrag = DbXStartDrag PopupMenu = BasePopupMenu Images = SmallImages StateImages = SmallImages end end end end object DataPanel: TPanel Left = 184 Top = 31 Width = 318 Height = 199 Align = alClient BevelOuter = bvNone TabOrder = 1 object DataInfoPanel: TPanel Left = 0 Top = 0 Width = 318 Height = 20 Align = alTop Alignment = taLeftJustify BevelOuter = bvLowered TabOrder = 1 object DataInfoLine: TLabel Left = 6 Top = 3 Width = 2 Height = 11 end end object DataPageControl: TPageControl Left = 0 Top = 24 Width = 318 Height = 175 ActivePage = TabDefinition Align = alClient TabOrder = 0 OnChange = DataPageControlChange object TabDefinition: TTabSheet HelpContext = 1020 Caption = 'Definition' PopupMenu = BasePopupMenu end object TabSummary: TTabSheet HelpContext = 1030 Caption = 'Summary' object SummaryView: TListView Left = 0 Top = 0 Width = 329 Height = 118 Align = alClient ColumnClick = False OnDblClick = SummaryViewShowInTree Columns = <> DragMode = dmAutomatic ReadOnly = False IconOptions.Arrangement = iaLeft OnChange = SummaryViewSelect OnEdited = SummaryViewEdited OnEditing = SummaryViewEditing OnEnter = SummaryViewEnter OnExit = SummaryViewExit OnStartDrag = DbXStartDrag PopupMenu = BasePopupMenu TabOrder = 0 ViewStyle = vsSmallIcon LargeImages = LargeImages SmallImages = SmallImages StateImages = SmallImages end end object TabText: TTabSheet HelpContext = 1040 Caption = 'Text' object DefinitionMemo: TMemo Left = 0 Top = 0 Width = 329 Height = 118 Align = alClient OEMConvert = True ReadOnly = True ScrollBars = ssBoth TabOrder = 0 WordWrap = False end end object TabDiagram: TTabSheet HelpContext = 1050 Caption = 'Diagram' object ConnectionPanel: TPanel Left = 0 Top = 0 Width = 329 Height = 118 Align = alClient BevelInner = bvLowered BevelOuter = bvLowered Caption = 'Data Model Diagramming Not Implemented Yet' TabOrder = 0 end end object TabData: TTabSheet HelpContext = 1060 Caption = 'Data' object TableGrid: TDBGrid Left = 0 Top = 0 Width = 329 Height = 118 Align = alClient DataSource = DbTableSource TabOrder = 0 TitleFont.Color = clBlack TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] OnDblClick = ViewABlob end end object TabSQL: TTabSheet HelpContext = 1070 Caption = 'Enter SQL' object QueryPanel: TPanel Left = 0 Top = 0 Width = 0 Height = 32 Align = alTop BevelOuter = bvNone PopupMenu = QueryPopupMenu TabOrder = 0 object QueryMemo: TMemo Left = 0 Top = 0 Width = 279 Height = 32 Align = alClient TabOrder = 0 end object QueryButtons: TPanel Left = -31 Top = 0 Width = 31 Height = 32 Align = alRight BevelOuter = bvNone TabOrder = 1 object SBExecQuery: TSpeedButton Left = 4 Top = 4 Width = 25 Height = 25 Hint = 'Execute Query' Glyph.Data = { FC020000424DFC02000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333300003333333333333333333300003333333083333333333300003333 33380833333333330000333333330083333333330000333333330B0833333333 00003333330000B08333333300003333330BBFBB08333333000033333330FB00 00333333000033333330BFB0833333330000333300000BFB0833333300003333 0FBFBFBFB08333330000333330FBFB00003333330000333330BFBFB083333333 00003333330BFBFB0833333300003333330FFFBFF0833333000033333330FBFF BF08333300003333333000000000333300003333333333333333333300003333 3333333333333333000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000006C756D6E446566000D42444544650000000000000000000000000000} OnClick = PMQExecClick end end end object QueryGrid: TDBGrid Left = 0 Top = 35 Width = 310 Height = 112 Align = alClient DataSource = DbQuerySource TabOrder = 1 TitleFont.Color = clBlack TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] Visible = False OnDblClick = ViewABlob end object QuerySplitPanel: TPanel Left = 0 Top = 32 Width = 0 Height = 3 Cursor = crVSplit Align = alTop BevelInner = bvRaised BevelOuter = bvLowered DragCursor = crVSplit TabOrder = 2 OnMouseDown = QuerySplitPanelMouseDown OnMouseMove = SplitPanelMouseMove OnMouseUp = SplitPanelMouseUp end end end object PageDeltaPanel: TPanel Left = 0 Top = 20 Width = 318 Height = 4 Align = alTop BevelOuter = bvNone TabOrder = 2 end end object MainSplitPanel: TPanel Left = 180 Top = 31 Width = 4 Height = 199 Cursor = crHSplit Align = alLeft BevelOuter = bvNone DragCursor = crHSplit TabOrder = 2 OnMouseDown = MainSplitPanelMouseDown OnMouseMove = SplitPanelMouseMove OnMouseUp = SplitPanelMouseUp end object StatusBar: TStatusBar Left = 0 Top = 230 Width = 502 Height = 19 Panels = <> SimplePanel = True end object DbTable: TTable Left = 8 Top = 128 end object BasePopupMenu: TPopupMenu OnPopup = BasePopupMenuPopup Left = 40 Top = 96 object PMOpen: TMenuItem Caption = '&Open' Enabled = False ShortCut = 0 OnClick = PMOpenCloseClick end object PMClose: TMenuItem Caption = '&Close' Enabled = False ShortCut = 0 OnClick = PMOpenCloseClick end object PMRefresh: TMenuItem Caption = '&Refresh' Enabled = False ShortCut = 16466 OnClick = PMRefreshClick end object N2: TMenuItem Caption = '-' ShortCut = 0 end object PMNew: TMenuItem Caption = '&New...' Enabled = False ShortCut = 16462 OnClick = PMNewClick end object PMDelete: TMenuItem Caption = '&Delete' Enabled = False ShortCut = 16430 OnClick = PMDeleteClick end object PMRename: TMenuItem Caption = 'Rena&me' Enabled = False ShortCut = 16461 OnClick = PMRenameClick end object PMSave: TMenuItem Caption = '&Apply' Enabled = False ShortCut = 16449 OnClick = PMSaveClick end object PMCancel: TMenuItem Caption = 'Cance&l' Enabled = False ShortCut = 32776 OnClick = PMCancelClick end object PMImport: TMenuItem Caption = '&Import' Enabled = False ShortCut = 0 OnClick = PMImportClick end object MHotKey: TMenuItem Caption = 'HotKey' ShortCut = 32889 Visible = False OnClick = MHotKeyClick end object _Rename: TMenuItem Caption = '_Rename' ShortCut = 113 Visible = False OnClick = PMRenameClick end end object MainMenu: TMainMenu Left = 8 Top = 96 object MObject: TMenuItem Caption = '&Object' ShortCut = 0 OnClick = MObjectClick object MOpen: TMenuItem Caption = '&Open' Enabled = False Hint = 'Open the selected item' ShortCut = 0 OnClick = PMOpenCloseClick end object MClose: TMenuItem Caption = '&Close' Enabled = False Hint = 'Close the selected item' ShortCut = 0 OnClick = PMOpenCloseClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object MNew: TMenuItem Caption = '&New...' Enabled = False ShortCut = 0 OnClick = PMNewClick end object MDelete: TMenuItem Caption = '&Delete' Enabled = False ShortCut = 0 OnClick = PMDeleteClick end object MRename: TMenuItem Caption = 'Rena&me' Enabled = False ShortCut = 0 OnClick = PMRenameClick end object MSave: TMenuItem Caption = '&Apply' Enabled = False ShortCut = 0 OnClick = PMSaveClick end object MCancel: TMenuItem Caption = 'Cance&l' Enabled = False ShortCut = 0 OnClick = PMCancelClick end object N4: TMenuItem Caption = '-' ShortCut = 0 end object MExit: TMenuItem Caption = 'E&xit' Hint = 'Close the Explorer' ShortCut = 0 OnClick = MExitClick end end object MRepository: TMenuItem Caption = '&Dictionary' ShortCut = 0 OnClick = MRepositoryClick object MDRSelect: TMenuItem Caption = '&Select...' ShortCut = 0 OnClick = MDRSelectClick end object MDRRegister: TMenuItem Caption = '&Register...' ShortCut = 0 OnClick = MDRRegisterClick end object MDRUnregister: TMenuItem Caption = '&Unregister...' ShortCut = 0 OnClick = MDRUnregisterClick end object MDRNew: TMenuItem Caption = '&New...' ShortCut = 0 OnClick = MDRNewClick end object MDRDelete: TMenuItem Caption = '&Delete...' ShortCut = 0 OnClick = MDRDeleteClick end object MDRImportDb: TMenuItem Caption = 'I&mport from Database...' Enabled = False ShortCut = 0 OnClick = MDRImportDbClick end object MDRImport: TMenuItem Caption = '&Import from File...' Enabled = False ShortCut = 0 OnClick = MDRImportClick end object MDRExport: TMenuItem Caption = '&Export to File...' Enabled = False ShortCut = 0 OnClick = MDRExportClick end end object MEdit: TMenuItem Caption = '&Edit' ShortCut = 0 OnClick = MEditClick object MCut: TMenuItem Caption = 'Cu&t' Enabled = False Hint = 'Cut to clipboard' ShortCut = 16472 OnClick = MCutClick end object MCopy: TMenuItem Caption = '&Copy' Enabled = False Hint = 'Copy to clipboard' ShortCut = 16451 OnClick = MCopyClick end object MPaste: TMenuItem Caption = '&Paste' Enabled = False Hint = 'Paste from clipboard' ShortCut = 16470 OnClick = MPasteClick end object MOldCut: TMenuItem Caption = 'OldCut' ShortCut = 8238 Visible = False OnClick = MCutClick end object MOldCopy: TMenuItem Caption = 'OldCopy' ShortCut = 16429 Visible = False OnClick = MCopyClick end object MOldPaste: TMenuItem Caption = 'OldPaste' ShortCut = 8237 Visible = False OnClick = MPasteClick end object MOtherCut: TMenuItem Caption = 'OtherCut' ShortCut = 16430 Visible = False OnClick = MCutClick end end object MView: TMenuItem Caption = '&View' ShortCut = 0 OnClick = MViewClick object MToolbar: TMenuItem Caption = '&Toolbar' Checked = True ShortCut = 0 OnClick = MToolbarClick end object MStatusBar: TMenuItem Caption = 'Status &Bar' Checked = True ShortCut = 0 OnClick = MStatusBarClick end object MViewBlobs: TMenuItem Caption = 'Blob &Explorer' ShortCut = 0 OnClick = ViewBlobsClick end object MViewSystemData: TMenuItem Caption = '&System Data' ShortCut = 0 OnClick = MViewSystemDataClick end object N8: TMenuItem Caption = '-' ShortCut = 0 end object MLargeIcons: TMenuItem Caption = 'Lar&ge Icons' GroupIndex = 1 RadioItem = True ShortCut = 0 OnClick = MViewStyleClick end object MSmallIcons: TMenuItem Tag = 1 Caption = 'S&mall Icons' Checked = True GroupIndex = 1 RadioItem = True ShortCut = 0 OnClick = MViewStyleClick end object MList: TMenuItem Tag = 2 Caption = '&List' GroupIndex = 1 RadioItem = True ShortCut = 0 OnClick = MViewStyleClick end object MDetail: TMenuItem Tag = 3 Caption = '&Detail' GroupIndex = 1 RadioItem = True ShortCut = 0 OnClick = MViewStyleClick end object MAutoArrange: TMenuItem Caption = '&Auto Arrange' GroupIndex = 2 ShortCut = 0 OnClick = MAutoArrangeClick end object N9: TMenuItem Caption = '-' GroupIndex = 2 ShortCut = 0 end object MRefresh: TMenuItem Caption = '&Refresh' Enabled = False GroupIndex = 2 ShortCut = 0 OnClick = PMRefreshClick end end object MOptions: TMenuItem Caption = 'O&ptions' ShortCut = 0 object MConfirmEdits: TMenuItem Caption = 'Confirm &Edits' Checked = True ShortCut = 0 OnClick = MConfirmEditsClick end object MLiveQueries: TMenuItem Caption = '&Live Queries' ShortCut = 0 OnClick = MLiveQueriesClick end object MKeepTreeSync: TMenuItem Caption = '&Sync Pages' Checked = True ShortCut = 0 OnClick = MKeepTreeSyncClick end end object MHelp: TMenuItem Caption = '&Help' ShortCut = 0 OnClick = MHelpClick object MContents: TMenuItem Caption = '&Contents' ShortCut = 0 OnClick = MContentsClick end object MAbout: TMenuItem Caption = '&About...' ShortCut = 0 OnClick = MAboutClick end end end object DbQuery: TQuery AfterOpen = DbQueryAfterOpen BeforeClose = DbQueryBeforeClose Left = 40 Top = 128 end object DbTableSource: TDataSource DataSet = DbTable Left = 8 Top = 160 end object DbQuerySource: TDataSource DataSet = DbQuery Left = 40 Top = 160 end object QueryPopupMenu: TPopupMenu OnPopup = QueryMenuPopup Left = 72 Top = 96 object PMQUndo: TMenuItem Caption = '&Undo' ShortCut = 0 OnClick = PMQUndoClick end object N5: TMenuItem Caption = '-' ShortCut = 0 end object PMQCut: TMenuItem Caption = 'Cu&t' ShortCut = 0 OnClick = PMQCutClick end object PMQCopy: TMenuItem Caption = '&Copy' ShortCut = 0 OnClick = PMQCopyClick end object PMQPaste: TMenuItem Caption = '&Paste' ShortCut = 0 OnClick = PMQPasteClick end object PMQDelete: TMenuItem Caption = '&Delete' ShortCut = 0 OnClick = PMQDeleteClick end object PMQSelectAll: TMenuItem Caption = 'Se&lect All' ShortCut = 16449 OnClick = PMQSelectAllClick end object N6: TMenuItem Caption = '-' ShortCut = 0 end object PMQLoad: TMenuItem Caption = 'Load From File...' ShortCut = 16460 OnClick = PMQLoadClick end object PMQSave: TMenuItem Caption = 'Save to File...' ShortCut = 16467 OnClick = PMQSaveClick end object N7: TMenuItem Caption = '-' ShortCut = 0 end object PMQExecute: TMenuItem Caption = 'E&xecute' ShortCut = 16453 OnClick = PMQExecClick end object MQueryHotKey: TMenuItem Caption = 'HotKey' ShortCut = 32889 Visible = False OnClick = MQueryHotKeyClick end end object LoadQueryDialog: TOpenDialog HelpContext = 3000 DefaultExt = 'sql' FileEditStyle = fsEdit Filter = 'SQL Files (*.sql)|*.sql|All Files|*.*' Options = [ofHideReadOnly, ofShowHelp, ofPathMustExist, ofFileMustExist] Title = 'Load Query' Left = 104 Top = 160 end object SaveQueryDialog: TSaveDialog HelpContext = 2900 DefaultExt = 'sql' FileEditStyle = fsEdit Filter = 'SQL Files(*.sql)|*.sql|All Files|*.*' Options = [ofOverwritePrompt, ofHideReadOnly, ofShowHelp] Title = 'Save Query' Left = 72 Top = 160 end object TablePopupMenu: TPopupMenu Left = 104 Top = 96 end object SmallImages: TImageList Left = 72 Top = 128 end object LargeImages: TImageList Height = 32 Width = 32 Left = 104 Top = 128 end object ImportFileDialog: TOpenDialog HelpContext = 3100 DefaultExt = 'bdx' FileEditStyle = fsEdit Filter = 'Borland Dictionary Exchange Files (*.bdx)|*.bdx|All Files|*.*' Options = [ofHideReadOnly, ofShowHelp, ofPathMustExist, ofFileMustExist] Title = 'Import from File into Dictionary' Left = 136 Top = 160 end end