Huraah! Proof I`m not going mad :) I`d be more than happy to test it out.
/me goes off to backup current files.
Steve
I've had a quick look at the source, and it appears there is indeed a
leak, which matches your described symptoms:
- If there is no transparency in the image, then AlphaCOpyToDC uses
exactly the same code as CopyToDC, so no leak.
- As soon as there is some transparency, then it looks like it will leak
about the size of the bitmap (width of bitmap * height of bitmap * 4
bytes per call plus a bit of overhead).
The fix is simple. I'm hoping to get a beta release of 1.04 (which I
will add this fix to) up for download later today - you might like to
download it and see if it fixes this problem?
Regards,
Rob.
Steve Loughran wrote:
OK, some more on this memory leak issue.
If I change the code from using AlphaCopyToDC() to using CopyToDC()
(Havent changed anything else in the code at all), the memory leak
stops... completely. If I put AlphaCopyToDC() back in again, the leak
reappears.
Odd.... i`ll try to write a small code sample with some images and put
them all in a zip so someone else can try it (just to save my sanity).
Is Laurent Rocher a subscribed member on the win32-gui mail list?
Steve
Steve Loughran wrote:
Strict - yes, all the time
warning - most of the time :)
I think I have tracked the leak down to the window_paint routine, and
specifically to the DIBitmap routine AlphaCopyToDC(). I need to do
some more fixed tests, but to me it looks like a problem with Alpha
channels in DIBitmap structures, or maybe just DIBitmap structures
loaded from PNG files.... or both :)
In window_paint, I call AlphaCopyToDC() to paint a solid image into
the $memDC (no memory leak), but when I use the same routine to paint
a load of smaller images that contain transparency layers via
AlphaCopyToDC() into the $memDC, the memory leak starts appearing. If
I comment out just this one call from the foreach loop (and leave
everything else running), the leak doesnt happen.
- Active Perl 5.8.6
- Win32-GUI-DIBitmap [0.15]
Need to find some transparent images to use as background image, and
see if the leak starts again.
Steve
Emmanuel E wrote:
are you already using use strict? if not use it and cleanup every
warning.
threads generally have all kinds of memory problems so if ur using
threads life becomes very difficult.
Steve Loughran wrote:
Hi all
Not strictly a win32-gui related question. How would I go about
tracking down my memory usage in a perl script? I have a small
memory leak in my code somewhere, but no idea where to start
looking for clues.
Anyone got any pointers or tips?
Steve
-------------------------------------------------------------------------
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/
-------------------------------------------------------------------------
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/
-------------------------------------------------------------------------
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/
-------------------------------------------------------------------------
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/
