branch | jv |
changeset 7723 | 620e91f9b082 |
parent 7722 | 1387e5aedc55 |
parent 7703 | ed5256740f66 |
child 7855 | 46203abe7d57 |
7722:1387e5aedc55 | 7723:620e91f9b082 |
---|---|
980 self paint:fgColor. |
980 self paint:fgColor. |
981 ]. |
981 ]. |
982 bgPaint := bgColor |
982 bgPaint := bgColor |
983 |
983 |
984 "Modified: 12.5.1996 / 19:40:43 / cg" |
984 "Modified: 12.5.1996 / 19:40:43 / cg" |
985 ! |
|
986 |
|
987 setDevice:aDevice |
|
988 device := aDevice |
|
985 ! |
989 ! |
986 |
990 |
987 viewOrigin |
991 viewOrigin |
988 "return the drawables visible origin (for scrolling)" |
992 "return the drawables visible origin (for scrolling)" |
989 |
993 |