equal
deleted
inserted
replaced
17 copiedLayout resizeData clipChildren selectionHiddenLevel |
17 copiedLayout resizeData clipChildren selectionHiddenLevel |
18 gridParameters setOfSuperViewsSizeChanged' |
18 gridParameters setOfSuperViewsSizeChanged' |
19 classVariableNames:'' |
19 classVariableNames:'' |
20 poolDictionaries:'' |
20 poolDictionaries:'' |
21 category:'Interface-UIPainter' |
21 category:'Interface-UIPainter' |
|
22 ! |
|
23 |
|
24 Object subclass:#ResizeData |
|
25 instanceVariableNames:'object selector delta' |
|
26 classVariableNames:'' |
|
27 poolDictionaries:'' |
|
28 privateIn:UIObjectView |
22 ! |
29 ! |
23 |
30 |
24 Object subclass:#UndoHistory |
31 Object subclass:#UndoHistory |
25 instanceVariableNames:'startIdentifier identifier painter history transaction enabled' |
32 instanceVariableNames:'startIdentifier identifier painter history transaction enabled' |
26 classVariableNames:'' |
33 classVariableNames:'' |
786 |selector delta| |
793 |selector delta| |
787 |
794 |
788 delta := anObject container originRelativeTo:self. |
795 delta := anObject container originRelativeTo:self. |
789 selector := ('resize:', aSelector, ':') asSymbol. |
796 selector := ('resize:', aSelector, ':') asSymbol. |
790 |
797 |
791 resizeData := Structure with:(#object->anObject) |
798 resizeData := ResizeData new |
792 with:(#selector->selector) |
799 object:anObject selector:selector delta:delta. |
793 with:(#delta->delta). |
|
794 |
800 |
795 "can change cursor dependent on vertical/horizontal resizing |
801 "can change cursor dependent on vertical/horizontal resizing |
796 " |
802 " |
797 oldCursor := cursor. |
803 oldCursor := cursor. |
798 self cursor:(Cursor leftHand). |
804 self cursor:(Cursor leftHand). |
799 |
805 |
800 |
806 "Modified: / 2.2.1998 / 13:40:55 / cg" |
801 |
|
802 ! |
807 ! |
803 |
808 |
804 doDragResize:aPoint |
809 doDragResize:aPoint |
805 "do a widget resize drag |
810 "do a widget resize drag |
806 " |
811 " |
2120 self select:newSel. |
2125 self select:newSel. |
2121 ] |
2126 ] |
2122 ]. |
2127 ]. |
2123 ! ! |
2128 ! ! |
2124 |
2129 |
|
2130 !UIObjectView::ResizeData methodsFor:'accessing'! |
|
2131 |
|
2132 delta |
|
2133 ^ delta |
|
2134 |
|
2135 "Created: / 2.2.1998 / 13:40:32 / cg" |
|
2136 ! |
|
2137 |
|
2138 object |
|
2139 ^ object |
|
2140 |
|
2141 "Created: / 2.2.1998 / 13:40:24 / cg" |
|
2142 ! |
|
2143 |
|
2144 object:anObject selector:aSymbol delta:anInteger |
|
2145 object := anObject. |
|
2146 selector := aSymbol. |
|
2147 delta := anInteger. |
|
2148 |
|
2149 "Created: / 2.2.1998 / 13:39:22 / cg" |
|
2150 ! |
|
2151 |
|
2152 selector |
|
2153 ^ selector |
|
2154 |
|
2155 "Created: / 2.2.1998 / 13:40:42 / cg" |
|
2156 ! ! |
|
2157 |
2125 !UIObjectView::UndoHistory class methodsFor:'constants'! |
2158 !UIObjectView::UndoHistory class methodsFor:'constants'! |
2126 |
2159 |
2127 maxHistorySize |
2160 maxHistorySize |
2128 "returns maximum size of history before removing oldest |
2161 "returns maximum size of history before removing oldest |
2129 record |
2162 record |