Mercurial Mercurial > hg > stx-libwidg2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
no borders in labels (2D style)
authorClaus Gittinger <cg@exept.de>
Thu, 15 Aug 1996 19:47:17 +0200
changeset 234 da6bb07255b2
parent 233 4979c1304456
child 235 9e90b546fc3c
no borders in labels (2D style)
2ColTxtV.st file | annotate | diff | comparison | revisions
TwoColumnTextView.st file | annotate | diff | comparison | revisions 
--- a/2ColTxtV.st	Fri Aug 02 21:03:37 1996 +0200
+++ b/2ColTxtV.st	Thu Aug 15 19:47:17 1996 +0200
@@ -19,7 +19,7 @@
 	category:'Views-Text'
 !
 
-!TwoColumnTextView class methodsFor:'documentation'!
+!TwoColumnTextView  class methodsFor:'documentation'!
 
 copyright
 "
@@ -96,7 +96,7 @@
     "Modified: 20.11.1995 / 13:23:12 / cg"
 ! !
 
-!TwoColumnTextView class methodsFor:'instance creation'!
+!TwoColumnTextView  class methodsFor:'instance creation'!
 
 openOn:firstText and:secondText
     "open up a view showing firstText and secondText side-by-side.
@@ -137,8 +137,10 @@
     top := StandardSystemView label:'two texts'.
     l1 := Label label:firstLabel in:top.
     l1 origin:0.0@0.0 corner:0.5@(l1 height).
+    l1 borderWidth:0.
     l2 := Label label:secondLabel in:top.
     l2 origin:0.5@0.0 corner:1.0@(l1 height).
+    l2 borderWidth:0.
 
     v := HVScrollableView 
                for:self 
@@ -156,10 +158,10 @@
         label:'display.rc'
     "
 
-    "Modified: 25.4.1996 / 13:31:09 / cg"
+    "Modified: 15.8.1996 / 19:46:38 / cg"
 ! !
 
-!TwoColumnTextView class methodsFor:'specification'!
+!TwoColumnTextView  class methodsFor:'specification'!
 
 numberOfViews
     ^ 2
@@ -176,7 +178,7 @@
     "Created: 20.11.1995 / 13:20:39 / cg"
 ! !
 
-!TwoColumnTextView class methodsFor:'documentation'!
+!TwoColumnTextView  class methodsFor:'documentation'!
 
 version
-^ '$Header: /cvs/stx/stx/libwidg2/Attic/2ColTxtV.st,v 1.13 1996-04-29 08:19:51 cg Exp $'! !
+^ '$Header: /cvs/stx/stx/libwidg2/Attic/2ColTxtV.st,v 1.14 1996-08-15 17:47:17 cg Exp $'! !
--- a/TwoColumnTextView.st	Fri Aug 02 21:03:37 1996 +0200
+++ b/TwoColumnTextView.st	Thu Aug 15 19:47:17 1996 +0200
@@ -19,7 +19,7 @@
 	category:'Views-Text'
 !
 
-!TwoColumnTextView class methodsFor:'documentation'!
+!TwoColumnTextView  class methodsFor:'documentation'!
 
 copyright
 "
@@ -96,7 +96,7 @@
     "Modified: 20.11.1995 / 13:23:12 / cg"
 ! !
 
-!TwoColumnTextView class methodsFor:'instance creation'!
+!TwoColumnTextView  class methodsFor:'instance creation'!
 
 openOn:firstText and:secondText
     "open up a view showing firstText and secondText side-by-side.
@@ -137,8 +137,10 @@
     top := StandardSystemView label:'two texts'.
     l1 := Label label:firstLabel in:top.
     l1 origin:0.0@0.0 corner:0.5@(l1 height).
+    l1 borderWidth:0.
     l2 := Label label:secondLabel in:top.
     l2 origin:0.5@0.0 corner:1.0@(l1 height).
+    l2 borderWidth:0.
 
     v := HVScrollableView 
                for:self 
@@ -156,10 +158,10 @@
         label:'display.rc'
     "
 
-    "Modified: 25.4.1996 / 13:31:09 / cg"
+    "Modified: 15.8.1996 / 19:46:38 / cg"
 ! !
 
-!TwoColumnTextView class methodsFor:'specification'!
+!TwoColumnTextView  class methodsFor:'specification'!
 
 numberOfViews
     ^ 2
@@ -176,7 +178,7 @@
     "Created: 20.11.1995 / 13:20:39 / cg"
 ! !
 
-!TwoColumnTextView class methodsFor:'documentation'!
+!TwoColumnTextView  class methodsFor:'documentation'!
 
 version
-^ '$Header: /cvs/stx/stx/libwidg2/TwoColumnTextView.st,v 1.13 1996-04-29 08:19:51 cg Exp $'! !
+^ '$Header: /cvs/stx/stx/libwidg2/TwoColumnTextView.st,v 1.14 1996-08-15 17:47:17 cg Exp $'! !
hg/stx-libwidg2