[Q][morphic] TextMorph with raised border - no way
Martin Drautzburg
martin.drautzburg at web.de
Thu Mar 28 22:44:23 UTC 2002
Ned Konz <ned at bike-nomad.com> writes:
> t _ TextMorph new contentsAsIs: 'Murph!'.
> t borderStyle: (BorderStyle complexAltRaised width: 6; baseColor: Color
> magenta lighter).
> t margins: 5 at 5; backgroundColor: Color blue lighter; textColor: Color green
> lighter.
> t openInWorld.
This gives me "cannot install color" on 3.2gamma
seems to happen in
FormCanvas>>setFillColor
fillColor isColor
ifFalse: [(fillColor isKindOf: InfiniteForm)
ifFalse: [^ self error: 'Cannot install color'].
^ port fillPattern: fillColor
where fillColor is #complexAltRaised
More information about the Squeak-dev
mailing list
|