Issue #2697: Move pnlTreeFilter to top.

This commit is contained in:
Ansgar Becker
2013-03-03 08:49:38 +00:00
parent dc896b1a01
commit 6a2605adf2
2 changed files with 9 additions and 9 deletions

View File

@ -376,7 +376,7 @@ object MainForm: TMainForm
end
object DBtree: TVirtualStringTree
Left = 0
Top = 0
Top = 25
Width = 169
Height = 228
Align = alClient
@ -398,7 +398,7 @@ object MainForm: TMainForm
ParentShowHint = False
PopupMenu = popupDB
ShowHint = True
TabOrder = 0
TabOrder = 1
TreeOptions.PaintOptions = [toHotTrack, toShowButtons, toShowDropmark, toShowRoot, toShowTreeLines, toThemeAware, toUseBlendedImages, toGhostedIfUnfocused, toUseExplorerTheme, toHideTreeLinesIfThemed]
TreeOptions.SelectionOptions = [toFullRowSelect, toRightClickSelect]
OnAfterPaint = DBtreeAfterPaint
@ -439,7 +439,7 @@ object MainForm: TMainForm
Height = 100
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
TabOrder = 2
Visible = False
DesignSize = (
169
@ -504,16 +504,16 @@ object MainForm: TMainForm
end
end
end
object pnlBelowTree: TPanel
object pnlTreeFilter: TPanel
Left = 0
Top = 228
Top = 0
Width = 169
Height = 25
Align = alBottom
Align = alTop
BevelOuter = bvNone
Caption = 'pnlBelowTree'
Caption = 'pnlTreeFilter'
ShowCaption = False
TabOrder = 2
TabOrder = 0
object editTableFilter: TButtonedEdit
Left = 78
Top = 2

View File

@ -559,7 +559,7 @@ type
Explainanalyzerforcurrentquery1: TMenuItem;
menuAutoExpand: TMenuItem;
menuTreeOptions: TMenuItem;
pnlBelowTree: TPanel;
pnlTreeFilter: TPanel;
editTableFilter: TButtonedEdit;
editDatabaseFilter: TButtonedEdit;
menuClearDataTabFilter: TMenuItem;