#UI_ENHANCEMENT by cg
authorClaus Gittinger <cg@exept.de>
Thu, 09 Jun 2016 16:12:08 +0200
changeset 5768 b1b202871d42
parent 5766 083ee2b67357
child 5769 32db0c4a851c
#UI_ENHANCEMENT by cg class: TextView changed: #searchDialogSpec
TextView.st
--- a/TextView.st	Thu Jun 09 03:57:03 2016 +0000
+++ b/TextView.st	Thu Jun 09 16:12:08 2016 +0200
@@ -394,7 +394,7 @@
          name: 'String search'
          min: (Point 10 10)
          max: (Point 1280 1024)
-         bounds: (Rectangle 0 0 429 349)
+         bounds: (Rectangle 0 0 475 376)
        )
        component: 
       (SpecCollection
@@ -438,7 +438,7 @@
                    tabable: true
                    model: caseSensitive
                    translateLabel: true
-                   extent: (Point 429 24)
+                   extent: (Point 475 24)
                  )
                 (ViewSpec
                    name: 'MatchBox'
@@ -458,7 +458,7 @@
                       (CheckBoxSpec
                          label: 'Regex Match'
                          name: 'CheckBox6'
-                         layout: (LayoutFrame -151 1 0 0 0 1 22 0)
+                         layout: (LayoutFrame -170 1 0 0 0 1 22 0)
                          activeHelpKey: matchWithRegex
                          enableChannel: matchWithRegexVisible
                          model: matchWithRegex
@@ -467,7 +467,7 @@
                       )
                     
                    )
-                   extent: (Point 429 24)
+                   extent: (Point 475 24)
                  )
                 (CheckBoxSpec
                    label: 'Search Full Words'
@@ -478,7 +478,7 @@
                    tabable: true
                    model: searchFullWord
                    translateLabel: true
-                   extent: (Point 429 24)
+                   extent: (Point 475 24)
                  )
                 (CheckBoxSpec
                    label: 'At Begin of Line Only'
@@ -488,7 +488,7 @@
                    tabable: true
                    model: searchAtBeginOfLineOnly
                    translateLabel: true
-                   extent: (Point 429 24)
+                   extent: (Point 475 24)
                  )
                 (CheckBoxSpec
                    label: 'Variable Only'
@@ -501,18 +501,18 @@
                    model: searchVariable
                    translateLabel: true
                    labelChannel: stringWithVariableUnderCursorHolder
-                   extent: (Point 429 24)
+                   extent: (Point 475 24)
                  )
                 (CheckBoxSpec
                    label: 'Select Lines'
                    name: 'CheckBox3'
-                   layout: (LayoutFrame 0 0.0 0 0 0 1.0 24 0)
                    activeHelpKey: selectLines
                    level: 0
                    initiallyInvisible: true
                    tabable: true
                    model: selectLinesHolder
                    translateLabel: true
+                   extent: (Point 429 24)
                  )
                 (CheckBoxSpec
                    label: 'Wrap at End of Text (forward only)'
@@ -522,7 +522,11 @@
                    tabable: true
                    model: wrapAtEndOfTextHolder
                    translateLabel: true
-                   extent: (Point 429 24)
+                   extent: (Point 475 24)
+                 )
+                (ViewSpec
+                   name: 'Box1'
+                   extent: (Point 475 10)
                  )
                 (HorizontalPanelViewSpec
                    name: 'HorizontalPanel1'
@@ -554,12 +558,12 @@
                          acceptOnReturn: true
                          acceptOnTab: true
                          acceptOnPointerLeave: true
-                         extent: (Point 284 24)
+                         extent: (Point 297 24)
                        )
                       )
                     
                    )
-                   extent: (Point 429 24)
+                   extent: (Point 475 24)
                  )
                 (CheckBoxSpec
                    label: '  Replace All (to End of Text)'
@@ -570,7 +574,7 @@
                    tabable: true
                    model: replaceAllBoolean
                    translateLabel: true
-                   extent: (Point 429 24)
+                   extent: (Point 475 24)
                  )
                 (CheckBoxSpec
                    label: '  Preserve Case'
@@ -581,7 +585,7 @@
                    tabable: true
                    model: replacePreserveCaseBoolean
                    translateLabel: true
-                   extent: (Point 429 24)
+                   extent: (Point 475 24)
                  )
                 )