Smalltalk › Pharo › Pharo Smalltalk Developers

BitmapFillStyle does not support translucent form

_‹ Previous Topic Next Topic _›

Classic

List

Threaded

2 messages Options

Denis Kudriashov

BitmapFillStyle does not support translucent form

Hello,

I try BitmapFillStyle with translucent form for my morph object. And It's does not work.
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?

What you think?

Stéphane Ducasse

Re: BitmapFillStyle does not support translucent form

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
>
>