Pictures sequenzes Probleme :-((.
radouane el marjani
estel1212 at yahoo.fr
Wed Mar 29 18:24:55 UTC 2006
Hi,
I need your help, I have 3 pictures produced as "SketchMorphs".
Now I want by using the Metohdes "startStopping" and "step" create
sequenzes of these pictures.
First I will see the picture "a", I want click on and il must coming
pictures b then c. but that don't work.
I would apreciate your help and I will writte my code below:
-------------------------------------------------
Morph subclass: #Test
instanceVariableNames: 'a b c path array'
classVariableNames: 'TestMorph'
poolDictionaries: ''
category: 'testRadouane'
-----------------------------------------------------
initializedisplays
a := SketchMorph fromFile: 'bilder\display\display.gif'.
b:= SketchMorph fromFile: 'bilder\display\nachrichten.gif'.
c:= SketchMorph fromFile: 'bilder\display\telefonbuch.gif'.
array:=Array new:3.
array at:1 put:a.
array at:2 put:b.
array at:3 put:c
-------------------------------------------------------------
startAnimation
path := OrderedCollection new.
2 to: 3 do: [:i | path add: (array at:i)].
path inspect.
self startStepping.
-----------------------------------------------------------------
step
path := OrderedCollection new.
2 to: 3 do: [:i | path add: (array at:i)].
path inspect.
path size > 0 ifTrue: [
a addMorphFront: path removeFirst.
a openInWorld.].
------------------------------------------------------------------
stepTime
^50
-------------------------------------------------------------------
initialize
super initialize.
self initializedisplays.
a openInWorld.
a
on: #mouseDown
send: #startAnimation
to: self.
------------------------------------------------------------------------
Now I tip in Workspace as below:
test _Test new
--------------------------------------------------------------------------
I can see the first pictur but beim clicken on this Photo, it will not
so working as I want!!!:-(
Have someone an idea.
Thanks for your help,
Radouane.
___________________________________________________________________________
Nouveau : téléphonez moins cher avec Yahoo! Messenger ! Découvez les tarifs exceptionnels pour appeler la France et l'international.
Téléchargez sur http://fr.messenger.yahoo.com
More information about the Squeak-dev
mailing list
|