Geoffrey Spear wrote:
I hate to bring back a nearly 6 month old thread, but is there some
sort of trick to getting Win32::GUI to find icons bundled with a
pp-built .exe?

I built one using "pp script.pl -o script.exe -a icon.ico" but the
icon only displays properly if there's a copy of it in the same
directory as the executable; if the .exe file is moved to another
directory it can't find the icon which should be bundled.

Geoffrey

I've got some code in Win32::GUI::SplashScreen that attempts to work
with PAR packed icon/bitmap files.  I think it used to work, but it's
pretty old.

There's a comment that says:

# try to load the splash image from the PAR_TEMP directory
# this is for exes built with PAR's pp -a xxxxx.bmp ...

And then goes on to do something equivalent to:

my $file = 'icon.ico';
my $path = '.';
$path = $ENV{PAR_TEMP} . "/inc" if exists $ENV{PAR_TMP};

my $icon = Win32::GUI::Icon->new("$path/$file");


I'd be interested to know if it still works :-)

Rob.


On 11/29/06, Glenn Linderman <[EMAIL PROTECTED]> wrote:
On approximately 11/29/2006 1:41 AM, came the following characters from
the keyboard of Steve Loughran:
yes, aparantly you can :)

http://perl-win32-gui.sourceforge.net/cgi-bin/docs.cgi?doc=bitmapinline

Aparantly :)  Or Apparently :)

But in a PAR context, there is little incentive to do that, vs. bundling
the file into the pp-built .exe

OK, I admit to bringing up the PAR context, but if you are looking to
bundle everything into a single file for easier distribution, PAR goes a
lot further toward that goal than BitmapInline :)
Steve Loughran wrote:

This was on my "to-find-out" list :) Can you use DIBitmap for inline icons?

Steve

Glenn Linderman wrote:

On approximately 11/28/2006 9:08 PM, came the following characters from
the keyboard of Apu islam:

anyone knows how I can replace the camel logo on the
Main window with my smily face ?


-Apu


Assuming $mw points to the main window, use

$my_smily_face_icon = new Win32::GUI::Icon( $iconfile );
$mw->SetIcon ( $my_smily_face_icon );

--
Glenn -- http://nevcal.com/
===========================
A protocol is complete when there is nothing left to remove.
-- Stuart Cheshire, Apple Computer, regarding Zero Configuration Networking


-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys - and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
http://perl-win32-gui.sourceforge.net/






Reply via email to