Hi denis
On Jan 11, 2011, at 10:34 PM, Denis Kudriashov wrote: > Hello, > > I try BitmapFillStyle with translucent form for my morph object. And It's > does not work. Did you try in latest squeak because I saw passing a fix for translucency but I do not know if this > There is AlphaInfiniteForm in polymorph package that work good as translucent > fill styles. > > BitmapFillStyle used by Morph>>useBitmapFill. This method try set default > bitmap form fill: > > fill := BitmapFillStyle fromForm: self defaultBitmapFillForm. > "Note: Must fix the origin due to global coordinates" > fill origin: self bounds origin. > self fillStyle: fill. > > For my application I change #useBitmapFill to open file choose dialog and > using user selection for fill style (by AlphaInfiniteForm). > > I want to share this little code. But I don't know how to package this? > AlphaInfiniteForm is from Polymorph-... package. But useBitmapFill is from > Morphic-.. package. > > Maybe AlphaInfiniteForm can be moved to Graphics-Display Objects package? as a first step Yes! Now I'm not sure that popping up a dialog is what should be done by default. > > What you think? Thanks for sharing that and we will > >
