On (15/11/07 12:01), Adrian Kuhn wrote:
From: Adrian Kuhn <akuhn(a)gmx.ch>
To: Moose-dev Moose-dev <moose-dev(a)iam.unibe.ch>
Subject: [Moose-dev] Patterns for Mondrian
Date: Thu, 15 Nov 2007 12:01:29 +0100
We extended Mondrian with patterns
| view |
view := Mondrian.ViewRenderer new.
view rectangleShape.
view shape fillColor: CodeFoo.Color red.
view shape patternColor: CodeFoo.Color black.
view shape patternName: [ :each ].
view shape width: 120.
view shape height: 80.
view nodes: #(gray diagonal inverseDiagonal fancy) .
view open.
cheers,
AA & Hani
Thats cool! Pretty funny how the patterns dont move with the objects
on which they are drawn though