On (15/11/07 12:01), Adrian Kuhn wrote:
From: Adrian Kuhn akuhn@gmx.ch To: Moose-dev Moose-dev moose-dev@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