equal
deleted
inserted
replaced
1 "{ Encoding: utf8 }" |
|
2 |
|
3 " |
1 " |
4 COPYRIGHT (c) 1993 by Claus Gittinger |
2 COPYRIGHT (c) 1993 by Claus Gittinger |
5 All Rights Reserved |
3 All Rights Reserved |
6 |
4 |
7 This software is furnished under a license and may be used |
5 This software is furnished under a license and may be used |
755 ]. |
753 ]. |
756 |
754 |
757 self contentsChanged. |
755 self contentsChanged. |
758 ]. |
756 ]. |
759 |
757 |
760 smooth ifTrue:[ |
758 (smooth and:[magnifiedImage notNil]) ifTrue:[ |
761 magnifiedImage extent = image extent ifTrue:[ |
759 magnifiedImage extent = image extent ifTrue:[ |
762 smoothMagnifiedImage := magnifiedImage |
760 smoothMagnifiedImage := magnifiedImage |
763 ] ifFalse:[ |
761 ] ifFalse:[ |
764 smoothMagnifiedImage := nil. |
762 smoothMagnifiedImage := nil. |
765 |
763 |
781 ]. |
779 ]. |
782 ]. |
780 ]. |
783 |
781 |
784 "Modified: / 06-09-2017 / 12:52:19 / Maren" |
782 "Modified: / 06-09-2017 / 12:52:19 / Maren" |
785 "Modified: / 04-10-2017 / 16:43:44 / cg" |
783 "Modified: / 04-10-2017 / 16:43:44 / cg" |
786 "Modified: / 28-05-2018 / 14:20:59 / Claus Gittinger" |
784 "Modified: / 10-08-2018 / 12:07:31 / Claus Gittinger" |
787 ! |
785 ! |
788 |
786 |
789 redrawX:x y:y width:w height:h |
787 redrawX:x y:y width:w height:h |
790 |xI yI depth shownImage imgWidth imgHeight right bott "rectRight rectBelow"| |
788 |xI yI depth shownImage imgWidth imgHeight right bott "rectRight rectBelow"| |
791 |
789 |