From f2babc8a214950996e35a5a4dc77d070c80d9240 Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Mon, 17 Dec 2018 21:46:25 +0100 Subject: [PATCH] Give horizontal splitter below SQL editor on a new query tab an Y position, so it's not placed above the editor. Closes #439. --- source/main.pas | 1 + 1 file changed, 1 insertion(+) diff --git a/source/main.pas b/source/main.pas index 93b99a38..a971ae02 100644 --- a/source/main.pas +++ b/source/main.pas @@ -10268,6 +10268,7 @@ begin QueryTab.spltQuery := TSplitter.Create(QueryTab.TabSheet); QueryTab.spltQuery.Parent := QueryTab.TabSheet; + QueryTab.spltQuery.Top := spltQuery.Top; // Important to get it below the editor, not above. See #439 QueryTab.spltQuery.Align := spltQuery.Align; QueryTab.spltQuery.Height := spltQuery.Height; QueryTab.spltQuery.Cursor := spltQuery.Cursor;