Re: [perl-win32-gui-hackers] Re: DragDrop as xs

[Jeremy W. <jez...@ho...>]

>It's very easy to make terrible mistakes in the XS part.
>Devel::LeakTrace helps. I don't like leaks in MessageLoop events.

I'll have a look at that module.

>No, more like:
>-onDragDrop => sub {
>   my ($win, $drag) = @_; # dragged to win
>   print "Mouse: ", join(", ", $drag->MousePosition), "\n";
>   print "Files: ", join(", ", $drag->Files), "\n";
>}

Looks good. Is there any chance that you could provide a simple working 
example that could also be added to CVS?

Cheers,

jez.