I use this in several of my applications, however, most of the time, I
use GUILoft to build my UI. In this case $win is my window or dialog
and this should work exactly as if I built the window object manually:
my $icon = new Win32::GUI::Icon('icon1.ico');
$win->ChangeIcon($icon);
note that it is expecting an icon object, not a bitmap object from my
testing (I have not verified this). Also, if I remember correctly,
icons used like this have to have some certain color depth and size
limits or they will not work right. It may be possible to convert a bmp
to a properly formatted icon in code, but I would not know how (if
someone has an example that does not require an external program other
than a perl module, I would like to know about it). I would also be
interested if there is a way to create an icon from a dll resource file?
Joe Frazier, Jr.
Senior Support Engineer
Peopleclick Service Support
Tel: +1-800-841-2365
E-Mail: [EMAIL PROTECTED]
________________________________
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Eric Hansen
Sent: Wednesday, July 28, 2004 5:55 PM
To: perl-win32-gui-users@lists.sourceforge.net;
[EMAIL PROTECTED]
Subject: RE: [perl-win32-gui-users] How to change
window/dialogbox icon
Peter, thanks, but what I am really needing is an icon for a
Window or DialogBox.
Not needing an icon for the system tray. I was hoping to be
able to use a small bitmap file
For the icon since I do not have an icon generator.
$Icon = new Win32::GUI::Bitmap("C:\\Bibles\\bible.bmp",1); #
1 specifies icon type
$W->Show();
$W->BringWindowToTop();
$W->SetIcon($Icon,0); # 0 = small icon, 1 = big
icon
$W->ChangeSmallIcon($Icon);
Does not do the trick.
Eric
-----Original Message-----
From: Peter Eisengrein [mailto:[EMAIL PROTECTED]
Sent: Wednesday, July 28, 2004 3:58 PM
To: 'Eric Hansen'; perl-win32-gui-users@lists.sourceforge.net
Subject: RE: [perl-win32-gui-users] How to change
window/dialogbox icon
my $icon = new Win32::GUI::Icon("Icon.ico");
my $ni = $Window->AddNotifyIcon(
-icon => $icon,
-id => 1,
-name => ni,
-tip => "Mouseover shows this",
);
-----Original Message-----
From: Eric Hansen [mailto:[EMAIL PROTECTED]
Sent: Wednesday, July 28, 2004 4:45 PM
To: perl-win32-gui-users@lists.sourceforge.net
Subject: [perl-win32-gui-users] How to change
window/dialogbox icon
Can someone show me an example how to
Change the camel (perl) icon to a user-defined icon?
In both Windows and DialogBoxes?
I tried using Windows/DialogBox option -icon =>
$myicon,
Where $myicon is either defined as...
$Icon = new Win32::GUI::Icon("C:\\Bibles\\bible.bmp");
(or)
$Icon = new
Win32::GUI::Bitmap("C:\\Bibles\\bible.bmp",1);
But neither work.
Thanks,
Eric
