Thanks Nicolai,

I get results with #fullDrawnOn:

My felling: it should not get that complicated.

Hilaire

Le 21/06/2014 10:29, Nicolai Hess a écrit :
> Here, I create a ImageMorph from a Form.
> And the forms canvas is used to render an AthensWrapMorph.
> The important point is, fullDrawOn: instead of drawOn:
> 
> |form wrap background|
> form:=(Form extent:(400@400)depth:32).
> wrap:=AthensWrapMorph  new.
> wrap extent:400@400.
> background := Morph new extent:400@400.
> background color:Color white.
> wrap addMorph:background.
> background addMorph: Morph new.
> wrap.
> wrap fullDrawOn:form getCanvas.
> (ImageMorph withForm: form) openInWorld
> 
> 
> 
> 
> 2014-06-21 9:23 GMT+02:00 Hilaire Fernandes
> <hilaire.fernan...@gmail.com
> <mailto:hilaire.fernan...@gmail.com>>:
> 
>     Hello,
> 
> 
>     I tried this but it produces empty form.
> 
>     |canvas |
>     canvas := (Form extent: aDrgeo area athensSurface extent depth: 32)
>     getCanvas.
>     aDrgeo area athensSurface displayOnMorphicCanvas: canvas at: 0@0.
>     canvas form
> 
> 
>     Hilaire
> 
>     Le 20/06/2014 12:55, Igor Stasenko a écrit :
>     > the best way is to blit surface on the morphic canvas
>     > using
>     > displayOnMorphicCanvas: canvas at: aPoint
>     > method.
>     >
> 
>     --
>     Dr. Geo http://drgeo.eu
>     iStoa - https://launchpad.net/istoa
> 
> 
> 

-- 
Dr. Geo http://drgeo.eu
iStoa - https://launchpad.net/istoa


Reply via email to