Hi listers, Vladimir and myself are trying to have the icon, in the program (NOT what is seen on the desktop) to change from the "Joe Camel" icon...
Here is the code we are using: use Win32::GUI; use Win32::GUI::BitmapInline (); $I = new Win32::GUI::BitmapInline( q( Qk1KCAAAAAAAADYEAAAoAAAAIQAAAB0AAAABAAgAAAAAABQEAAAAAAAAAAAAAAABAAAAAAAA//// AGtrawDOzs4A1tbWAN7e3gDn5+cA7+/vAPf39wCtrcYAjJS9AJylxgBzhL0AWnPGAEpjtQAAKbUA e4y9ADFStQCcpb0AGEK1AAAxvQAAOc4AADnGAAhK1gAAQs4AAELWAABK5wCUrd4ASnvWAABK1gAA St4AAFLvAJS17wBKe84AAFLnAABa9wC91v8Ae5zOACl79wAhY84AKXv/ABhz/wAQa/8AAFrvAABj /wCtzv8ASpT/ADmM/wAhc+cAIXv/ABBz/wAIa/8AnMb/AHu1/wBjpf8AQoTeAEKU/wA5hOcAKYT/ AIS9/wBapf8ASozeAEqc/wC1vcYA3u//AM7n/wB7vf8A3ufvAL3n9wDG3ucAvdbeAJzO3gAApdYA nL3GAHu9zgBKpb0AQpy1ACGcvQAQve8ACLXnAACUvQAAnMYAAK3eAIzO3gBrrb0Aa7XGAFKcrQBC pb0AKdb/ACHW/wAYnL0AGMbvABjO9wAQvecACM7/AACEpQAAjK0AAJS1AAClzgAArdYAAMb3AADO /wCt1t4AnMbOAIy1vQBjrb0AWqW1ABiUrQAIe5QACIScAABzjAAAe5QAAJy9AHOlrQCM5/cAOZyt ACmUpQAhpb0AAIScAACUrQAhjJwACISUAABzhACMztYAa7W9AGOttQC9xsYA3u/vALXGxgCcra0A pb29AJzOxgBahHsAGIRrAABrUgDO7+cAe5yUACmMcwAYe2MACGtSAABjSgAAhGMAnNbGAFq1nABK pYwAOZR7ABhzWgAIe1oAAHNSAAB7WgCMxrUAc62cAEqEcwBjtZwAMYRrAACMYwC1/+cAWqWMAGP3 xgA5nHsAIYRjACGccwAYe1oAGK17AABjQgAAlGMAAJxrAACtcwAAxoQAe62cAIzWvQAAjFoAAL17 AADOhAAA1owAAOeUAADvnACc3sYACP+lAACEUgAAnGMAAK1rAAC1cwAAxnsAAN6MAADvlADW/+8A vefWAIy1pQAAvXMAANaEAO/37wD/7+cA/+feAP/OvQD/vaUA/7WcAP+lhAD/nHsA/4xjAP+EWgD/ rZQA/5RzAP97UgD/c0oA972tAP+ljAD/jGsA/4RjAP9rQgD/YzkA78a9AP+9rQD/nIQA95R7AP+U ewD/e1oA93NSAP9zUgDva0oA/7WlAPellADnlIQA/4RrAPdzWgD/zsYA98a9AOeEcwD/e2MA92tS AO9jSgDvWkIA3lI5AOdSOQD3hHMA51pKAOdSQgDnSjkA3kIxANY5KQDWMSEA1ntzAN5zawDOY1oA zlJKAM5KQgDWQjkA//f3AM7GxgDOra0AvZycANatrQDOnJwAzoyMANaMjADOa2sAAAAAAAAAAAAA AAAAAAAAAAAAAAAHBQUFBQYHAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB39TU1NTU4ECAgQF AAAAAAAAAAAAAAAAAAAAAAAAAAAAAABmd15QR1xaWE1hTEsCAgEAAAAAAAAAAAAAAAAAAAAAAAAA BkZ5bl9vYlxcV1tdZFFIfQUAAAAAAAAAAAAFBge+Br4GBgX6+EVrbV5gYU5cW1ddZGRpAwAAAAAA AAAAAOrw+/kCAgL3/PHn8wVzeXVgYWJcWlhbZGRZAgAAAAAAAAAAANvLzund4uLV6eXn7wNJeW5f UGFcWldbXWRifwUAAAAAAAAAAMDQ19bIw9TJz9jo7vtleW5eb0dcXFtYXWRjcAQAAAAAAAAAAADQ ysnIw83Wzt/r7f4GeHleYGFRXFpXXWRkSwIAAAAAAAAAAADUy97E28jUyd/l5/QES3l1dlBiXFpX W2RkUAIGAAAAAAAAAADTy8/Ww8jUyd7a5+/3enluX29hXFpbWF1kUWcEAAAAAAAAAAC/0cfJyMPN 1sbY6+78RG1tXmBhTlxbV11kY1UEAAAAAAAAAAAAx9nOzcPNxc7f6+3yBXh5alI/Bwd+Q3FXZEwA AAAAAAAAAAAAzdDP1NvI1MnP5ef1BUpTB367lpiYlqh9A0QHBwAAAAAAAAAA4NDXxcjIzcnP2Oju wAB+nJKkpqutrrGroqCABAAAAAAAAAAAv9DKyc3bzdbO2OrhAACfi5SltKusrq+xrqyZAgAAAAAA AAAAAPbSzNzT08PD4PZCGgWPo5Oapbyst6+xr62TAgYAAAAAAAAAAB8mJBE+AgL3CiAWDgOCioWM pbW2ra+xr7ezgAUAAAAAAAAAAEArMCU4PDYvMiEcDgkGn4uUpaarra6vsa62gwMAAAAAAAAAAAAp KDk9OzcnMiocEw0GkIuUpLSrrK6vsa69nwIHAAAAAAAAAAAtKSc3Oy05KSIdFRIEgqOTmqW1p62v sbitlH0GAAAAAAAAAAAzMjAuOz0uKCshFw4IhpGFjKWmtq2usa+3pocEAAAAAAAAAAA/KyguPTsu MDIeFxMLB5mLlKW0q6yusbGurJcCAAAAAAAAAAAAMCk5LTUtOTIqHRMQBJWjk5qlq6y3r7G4raEC BgAAAAAAAAAANSkwNzs9OSgrHRUOArqRhZipAAAAuZudrqoFAAAAAAAAAAAALCswLj09LigrIRgO D36esAAAAAAAAAAAAH4AAAAAAAAAAAAABysoOT07NycyHhwTDAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAACcpOTc7PTkoIh0bBwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAIzo0NDUtNUAAAAAAAAAA AAAAAAAAAAAAAAAAAA== ) ); $W = new Win32::GUI::Window( -title => "Test", -left => 200, -top => 200, -width => 100, -height => 100, -style => WS_OVERLAPPEDWINDOW, ); $E = MIME::Base64::encode_base64($I); $B = new Win32::GUI::Bitmap($E); $BITMAP = $W->AddLabel( -width => 100, -height => 100, -style => 14, -visible => 1, ); $BITMAP->SetImage($I); $W->Show; Win32::GUI::Dialog(); sub Window_Terminate { return -1; } Any help would be greatly appreciated. Best I have been able to do is get the BMP to show up IN the window, not as the icon... Chris Anderson _______________________________________________ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs