Add a splitter between query memo and helpers which recalls its position set in the last session.

source/childwin.dfm

@@ -938,10 +938,19 @@ object MDIChild: TMDIChild
             BevelOuter = bvNone
             Constraints.MinHeight = 10
             TabOrder = 1
+            object spltQueryHelpers: TSplitter
+              Left = 332
+              Top = 0
+              Width = 4
+              Height = 96
+              Cursor = crSizeWE
+              Align = alRight
+              ResizeStyle = rsUpdate
+            end
             object SynMemoQuery: TSynMemo
               Left = 0
               Top = 0
-              Width = 336
+              Width = 332
               Height = 96
               SingleLineMode = False
               Align = alClient

source/childwin.pas

@@ -286,6 +286,7 @@ type
     MenuItem2: TMenuItem;
     lblDataTop: TLabel;
     btnDataSorting: TSpeedButton;
+    spltQueryHelpers: TSplitter;
     procedure menuclearClick(Sender: TObject);
     procedure popupQueryPopup(Sender: TObject);
     procedure lboxQueryHelpersClick(Sender: TObject);
@@ -910,6 +911,11 @@ begin
         pnlQueryMemo.Height := ReadInteger('querymemoheight');
       end;
 
+      if ValueExists( 'queryhelperswidth' ) then
+      begin
+        pnlQueryHelpers.Width := ReadInteger('queryhelperswidth');
+      end;
+
       if ( ValueExists( 'dbtreewidth' ) ) then
       begin
         DBtree.Width := ReadInteger( 'dbtreewidth' );
@@ -1051,6 +1057,7 @@ begin
       WriteInteger( 'childwinheight', height );
 
       WriteInteger( 'querymemoheight', pnlQueryMemo.Height );
+      WriteInteger( 'queryhelperswidth', pnlQueryHelpers.Width );
       WriteInteger( 'dbtreewidth', dbtree.width );
       WriteInteger( 'sqloutheight', PageControlBottom.Height );