Re: Advice for design of simple program.

Edgar,

        Thanks for your advice. I'll ditch the toys.<s>

        ===Blake===

On Thu, 22 Mar 2007 02:01:39 -0800, Edgar J. De Cleene  
<edgardec2001@xxxxxxxxxxxx> wrote:

> What I do if must cook your spec:
> Subclass ImageMorph
>
> ImageMorph subclass: #BlakeMorph
> instanceVariableNames: 'label number '
> classVariableNames: ''
> poolDictionaries: ''
> category: 'BlakeStuff'
>
> initialize
> super initialize.
> self image: Form fromFileNamed: "your path here or could use  
> FillInTheBlank
> for choose files"
> self isPartsBin.
> self openInHand
>
> Subclass TrashCanMorph
>
> TrashCanMorph subclass: #BlakeTrashCanMorph
>     instanceVariableNames: ''
>     classVariableNames: ''
>     poolDictionaries: ''
>     category: ' BlakeStuff'
>
> acceptDroppingMorph: aMorph event:  evt
>  ActiveWorld submorphs copy do: [:each | (each class  == BlakeMorph )
> ifTrue: [each doSome]].
>
>
> And you should implement what doSome is in your morph.