RE: [perl-win32-gui-users] Listview Control functionality - Drag n Drop - Email found in subject

[MJG]

 
I've been trying to play with the BitmapInline function so I can create
a dialog box with some edit fields and with a logo, but am not having
much luck.  Has anyone got this to work or have a better solution?  I'm
using Perl 5.8, Win32::Gui .558 and Mime-Base64-Perl extension.

MJG

use Win32::GUI;
use Win32::GUI::BitmapInline ();
use Mime::Base64::Perl;

            
$Bitmap1 = new Win32::GUI::BitmapInline( 
q(
Qk32AAAAAAAAAHYAAAAoAAAAEAAAABAAAAABAAQAAAAAAIAAAAAAAAAAAAAAABAAAAAQAAAA
AAAA
AACcnABjzs4A9/f3AJzO/wCc//8Azv//AP///wD///8A////AP///wD///8A////AP///wD/
//8A
////AHd3d3d3d3d3d3d3d3d3d3dwAAAAAAAABxIiIiIiIiIHFkVFRUVEQgcWVVRUVFRCBxZV
VVVF
RUIHFlVVVFRUUgcWVVVVVUVCBxZVVVVUVFIHFlVVVVVVQgcWZmZmZmZSBxIiIiIRERF3cTZl
UQd3
d3d3EREQd3d3d3d3d3d3d3d3 ) 
);