--- a/UIPainter.st Wed Oct 29 08:41:13 1997 +0100
+++ b/UIPainter.st Wed Oct 29 17:06:03 1997 +0100
@@ -109,6 +109,8 @@
UIHelpTool openOnClass:UIPainter
"
+ <resource: #help>
+
^ super helpSpec addPairsFrom:#(
#moveSelectionLeft
@@ -211,6 +213,8 @@
'set selected widgets to their default height'
)
+
+ "Modified: / 29.10.1997 / 03:19:58 / cg"
! !
!UIPainter class methodsFor:'helpers'!
@@ -263,67 +267,106 @@
iconAlignB
"returns image assigned to align bottom
"
+
+ <resource: #fileImage>
+
^ Image fromFile:'b_alignB.xbm'
+ "Modified: / 29.10.1997 / 03:18:16 / cg"
!
iconAlignCenterH
"returns image assigned to center horizontal
"
+
+ <resource: #fileImage>
+
^ Image fromFile:'b_alignCH.xbm'
+ "Modified: / 29.10.1997 / 03:18:34 / cg"
!
iconAlignCenterV
"returns image assigned to center vertical
"
+
+ <resource: #fileImage>
+
^ Image fromFile:'b_alignCV.xbm'
+ "Modified: / 29.10.1997 / 03:18:39 / cg"
!
iconAlignL
"returns image assigned to align left
"
+
+ <resource: #fileImage>
+
^ Image fromFile:'b_alignL.xbm'
+
+ "Modified: / 29.10.1997 / 03:18:43 / cg"
!
iconAlignLR
"returns image assigned to align left and right
"
+
+ <resource: #fileImage>
+
^ Image fromFile:'b_alignLR.xbm'
+ "Modified: / 29.10.1997 / 03:18:48 / cg"
!
iconAlignR
"returns image assigned to align right
"
+
+ <resource: #fileImage>
+
^ Image fromFile:'b_alignR.xbm'
+ "Modified: / 29.10.1997 / 03:18:51 / cg"
!
iconAlignT
"returns image assigned to align top
"
+
+ <resource: #fileImage>
+
^ Image fromFile:'b_alignT.xbm'
+ "Modified: / 29.10.1997 / 03:18:56 / cg"
!
iconAlignTB
"returns image assigned to align top and bottom
"
+
+ <resource: #fileImage>
+
^ Image fromFile:'b_alignTB.xbm'
+ "Modified: / 29.10.1997 / 03:19:01 / cg"
!
iconInstall
+
+ <resource: #fileImage>
+
^ Image fromFile:'bitmaps/xpmBitmaps/misc_tools/SaveButton.xpm'
- "Modified: 23.10.1997 / 06:00:28 / cg"
+ "Modified: / 29.10.1997 / 03:19:06 / cg"
!
iconStepDown
"returns image assigned to step down (change hierarchy).
"
+
+ <resource: #fileImage>
+
IconStepDown isNil ifTrue:[
IconStepDown := ((Image fromFile:'stepOver.xpm') rotated:90) flipHorizontal
].
@@ -333,30 +376,43 @@
IconStepDown := nil
"
+ "Modified: / 29.10.1997 / 03:19:14 / cg"
!
iconStepIn
"returns image assigned to step in (change hierarchy).
"
+
+ <resource: #fileImage>
+
IconStepIn isNil ifTrue:[
IconStepIn := ((Image fromFile:'stepIn.xpm') rotated:90) flipHorizontal
].
^ IconStepIn
+ "Modified: / 29.10.1997 / 03:19:19 / cg"
!
iconStepOut
"returns image assigned to step out (change hierarchy).
"
+
+ <resource: #fileImage>
+
IconStepOut isNil ifTrue:[
IconStepOut := ((Image fromFile:'stepOut.xpm') rotated:90) flipHorizontal
].
^ IconStepOut
+
+ "Modified: / 29.10.1997 / 03:19:25 / cg"
!
iconStepUp
"returns image assigned to step up (change hierarchy).
"
+
+ <resource: #fileImage>
+
IconStepUp isNil ifTrue:[
IconStepUp := ((Image fromFile:'stepOver.xpm') rotated:90) flipHorizontal flipVertical
].
@@ -365,6 +421,8 @@
"
IconStepUp := nil
"
+
+ "Modified: / 29.10.1997 / 03:19:29 / cg"
! !
!UIPainter class methodsFor:'interface specs'!
@@ -2639,6 +2697,8 @@
!
imageEmptyParent
+ <resource: #fileImage>
+
ImageEmptyParent isNil ifTrue:[
ImageEmptyParent := Image fromFile:('xpmBitmaps/document_images/tiny_dir.xpm').
@@ -2648,9 +2708,13 @@
"
ImageEmptyParent := nil
"
+
+ "Modified: / 29.10.1997 / 03:36:37 / cg"
!
imageMasterChild
+ <resource: #fileImage>
+
ImageMasterChild isNil ifTrue:[
ImageMasterChild := Image fromFile:('xpmBitmaps/document_images/tiny_file_plain_gray.xpm').
@@ -2661,10 +2725,12 @@
ImageMasterChild := nil
"
- "Modified: 28.7.1997 / 11:55:22 / cg"
+ "Modified: / 29.10.1997 / 03:36:42 / cg"
!
imageMasterParent
+ <resource: #fileImage>
+
ImageMasterParent isNil ifTrue:[
ImageMasterParent := Image fromFile:('xpmBitmaps/document_images/tiny_yellow_dir_gray.xpm').
@@ -2675,7 +2741,7 @@
ImageMasterParent := nil
"
- "Modified: 28.7.1997 / 11:56:29 / cg"
+ "Modified: / 29.10.1997 / 03:36:47 / cg"
! !
!UIPainter::TreeView class methodsFor:'documentation'!