diff -r 4391fcd36dcf -r 46793bf50415 UILayoutTool.st
--- a/UILayoutTool.st	Tue Mar 23 10:59:43 1999 +0100
+++ b/UILayoutTool.st	Tue Mar 23 11:33:40 1999 +0100
@@ -1308,9 +1308,18 @@
 #bottomAbsolute
 'Offset of the bottom edge; positive is to the bottom, negative to the top.'
 
+#bottomFixPartLayout
+'Set the layout for a fixed area at the bottom of the widgets containers space'
+
+#bottomHalfLayout
+'Set the layout for the bottom half of the widgets containers space'
+
 #bottomRelative
 'Relative corner y of the selected widget.'
 
+#leftHalfLayout
+'Set the layout for the left half of the widgets containers space'
+
 #makeBottomAbsolute
 'Computes current bottom offset and relative corner y to an absolute corner y.'
 
@@ -1326,27 +1335,53 @@
 #rightAbsolute
 'Offset of the right edge; positive is to the right, negative to the left.'
 
+#rightHalfLayout
+'Set the layout for the right half of the widgets containers space'
+
 #rightRelative
 'Relative corner x of the selected widget.'
 
+#topFixPartLayout
+'Set the layout for a fixed area at the top of the widgets containers space'
+
 #topHalfLayout
 'Set the layout for the top half of the widgets containers space'
 
-#bottomHalfLayout
-'Set the layout for the bottom half of the widgets containers space'
+#topLeftQuarterLayout
+'Set the layout for the top-left quarter of the widgets containers space'
+
+#topRightQuarterLayout
+'Set the layout for the top-right quarter of the widgets containers space'
 
-#leftHalfLayout
-'Set the layout for the left half of the widgets containers space'
+#bottomRightQuarterLayout
+'Set the layout for the bottom-right quarter of the widgets containers space'
 
-#rightHalfLayout
-'Set the layout for the right half of the widgets containers space'
-
+#bottomLeftQuarterLayout
+'Set the layout for the bottom-left quarter of the widgets containers space'
 
 )
 ! !
 
 !UILayoutTool::LayoutFrame class methodsFor:'image specs'!
 
+setBottomFixPartIcon
+    "This resource specification was automatically generated
+     by the ImageEditor of ST/X."
+
+    "Do not manually edit this!! If it is corrupted,
+     the ImageEditor may not be able to read the specification."
+
+    "
+     self setBottomFixPartIcon inspect
+     ImageEditor openOnClass:self andSelector:#setBottomFixPartIcon
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:#'UILayoutTool::LayoutFrame setBottomFixPartIcon'
+        ifAbsentPut:[(Depth4Image new) width: 16; height: 16; photometric:(#palette); bitsPerSample:(#(4 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@H"H"@BH"H @!!DQD@DQDR@BDQDP@QDQH@H"H"@BH"H @@@@@@@@@@@b') ; colorMapFromArray:#[0 0 0 255 0 0 255 255 255]; mask:((Depth1Image new) width: 16; height: 16; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'??>@@X@A @F@@X@A @F@@X@A @G???????????????<b') ; yourself); yourself]!
+
 setBottomHalfIcon
     "This resource specification was automatically generated
      by the ImageEditor of ST/X."
@@ -1455,6 +1490,24 @@
         constantNamed:#'UILayoutTool::LayoutFrame setToRightQuarterIcon'
         ifAbsentPut:[(Depth4Image new) width: 16; height: 16; photometric:(#palette); bitsPerSample:(#(4 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@@@@"H"H@@@@@@BDQD @@@@@@HQDR@@@@@@@!!DQH@@@@@@BDQD @@@@@@HQDR@@@@@@@"H"H@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') ; colorMapFromArray:#[0 0 0 255 0 0 255 255 255]; mask:((Depth1Image new) width: 16; height: 16; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'??>@?8C? O>@?8C? O>@?8C? @F@@X@A @F@@X@A??<b') ; yourself); yourself]!
 
+setTopFixPartIcon
+    "This resource specification was automatically generated
+     by the ImageEditor of ST/X."
+
+    "Do not manually edit this!! If it is corrupted,
+     the ImageEditor may not be able to read the specification."
+
+    "
+     self setTopFixPartIcon inspect
+     ImageEditor openOnClass:self andSelector:#setTopFixPartIcon
+    "
+
+    <resource: #image>
+
+    ^Icon
+        constantNamed:#'UILayoutTool::LayoutFrame setTopFixPartIcon'
+        ifAbsentPut:[(Depth4Image new) width: 16; height: 16; photometric:(#palette); bitsPerSample:(#(4 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@@@@BH"H @"H"H@HQDQ@ADQD @!!DQD@DQDR@BH"H @"H"H@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@b') ; colorMapFromArray:#[0 0 0 255 0 0 255 255 255]; mask:((Depth1Image new) width: 16; height: 16; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'???????????????? @F@@X@A @F@@X@A @F@@X@A??<b') ; yourself); yourself]!
+
 setTopHalfIcon
     "This resource specification was automatically generated
      by the ImageEditor of ST/X."
@@ -1702,6 +1755,7 @@
                 #label: 'setTopLeftQuarterFrame'
                 #translateLabel: true
                 #isButton: true
+                #activeHelpKey: #topLeftQuarterLayout
                 #nameKey: #setTopLeftQuarterFrame
                 #value: #setTopLeftQuarterFrame
                 #labelImage: #(#ResourceRetriever nil #setTopLeftQuarterIcon)
@@ -1710,6 +1764,7 @@
                 #label: 'setTopRightQuarterFrame'
                 #translateLabel: true
                 #isButton: true
+                #activeHelpKey: #topRightQuarterLayout
                 #nameKey: #setTopRightQuarterFrame
                 #value: #setTopRightQuarterFrame
                 #labelImage: #(#ResourceRetriever nil #setToRightQuarterIcon)
@@ -1718,6 +1773,7 @@
                 #label: 'setBottomRightQuarterFrame'
                 #translateLabel: true
                 #isButton: true
+                #activeHelpKey: #bottomRightQuarterLayout
                 #nameKey: #setBottomRightQuarterFrame
                 #value: #setBottomRightQuarterFrame
                 #labelImage: #(#ResourceRetriever nil #setBottomRightQuarterIcon)
@@ -1725,11 +1781,33 @@
              #(#MenuItem
                 #label: 'setBottomLeftQuarterFrame'
                 #translateLabel: true
+                #activeHelpKey: #bottomLeftQuarterLayout
                 #isButton: true
                 #nameKey: #setBottomLeftQuarterFrame
                 #value: #setBottomLeftQuarterFrame
                 #labelImage: #(#ResourceRetriever nil #setBottomLeftQuarterIcon)
             )
+             #(#MenuItem
+                #label: ''
+            )
+             #(#MenuItem
+                #label: 'setTopFixPartFrame'
+                #translateLabel: true
+                #isButton: true
+                #nameKey: #setTopFixPartFrame
+                #value: #setTopFixPartFrame
+                #activeHelpKey: #topFixPartLayout
+                #labelImage: #(#ResourceRetriever nil #setTopFixPartIcon)
+            )
+             #(#MenuItem
+                #label: 'setBottomFixPartFrame'
+                #translateLabel: true
+                #isButton: true
+                #nameKey: #setBottomFixPartFrame
+                #value: #setBottomFixPartFrame
+                #activeHelpKey: #bottomFixPartLayout
+                #labelImage: #(#ResourceRetriever nil #setBottomFixPartIcon)
+            )
           ) nil
           nil
       )
@@ -1775,6 +1853,14 @@
 
 !UILayoutTool::LayoutFrame methodsFor:'common frames'!
 
+setBottomFixPartFrame
+    self
+        setFrameLeft:0   offset:0 
+        right:1          offset:0 
+        top:1            offset:-30 
+        bottom:1         offset:0
+!
+
 setBottomHalfFrame
     self
         setFrameLeft:0  offset:0 
@@ -1827,6 +1913,14 @@
         bottom:1         offset:0
 !
 
+setTopFixPartFrame
+    self
+        setFrameLeft:0   offset:0 
+        right:1          offset:0 
+        top:0            offset:0 
+        bottom:0         offset:30
+!
+
 setTopHalfFrame
     self
         setFrameLeft:0   offset:0