Hi Win32 GUI Experts, This is in connection with Alex Lee's postings last year about Win32::GUI::DIBitmap. I tried doing the following, but it doesn't work. Was there any solution for this one?
my $A = 0; my $B = 'shimgvw.dll'; my $apiExecute = new Win32::API("Shell32", "ExtractIcon", ['P','P','N'],'N'); my $hIcon= $apiExecute->Call($A,$B,1); use Win32::GUI::DIBitmap; my $dib = newFromBitmap Win32::GUI::DIBitmap($hIcon) or die "no $!"; $hbitmap = $dib->ConvertToBitmap(); $IL = new GUI::ImageList(16, 16, 24, 3, 10); $IL->Add("folder.bmp"); $IL->Add($hbitmap); There is this small utility that I'm gonna send to my users network wide, but I don't want to send it together with a bunch of bmp files. So, I wanted to use the Windows icon stock in Shell32.dll to dynamically create the images. Is there any other way of doing this? Or perhaps, it is possible to include the bmp files in the executables using PDK4, PerlApp utility? Thanks and Regards, Sam Dela Cruz