RE: [perl-win32-gui-users] A slightly OT question, how to create an icon on the fly

[Jeremy W. <jez...@ho...>]

>I'd like to be able to have an icon (displayed in the system tray) that is
>created "On the fly".  Something like the W2K/XP task manager icon, but 
>with
>text indicating the percentage overlaid.
>
>I know that I could do this by creating 100 discrete icons, but what a pain
>this would be. (Actually what I'd ultimately like to do would probably
>require 1000 icons!)
>
>Is there a module to create simple graphics?  I could create the icon, and
>use  BitmapInline to import/display it.
>
>Can this be done, or am I crazy.

Hi,

This is the way I would do it. Create a off screen bitmap, paint your 
'source' icon onto the bitmap, add the text that you need to the bitmap. 
Now, create a off screen tool bar, add the bitmap to the toolbar, then use 
the GetIcon method from the toolbar to create an icon that you can use in 
the system tray.

You wont need any external modules.

Cheers,

jez.