[perl-win32-gui-users] A dynamic popup menu example

Thanks to Peter Eisengrein and Leonard Jacobsen for giving me the pointers to build this example. The code below creates a window with a richtext control. The richtext can be populated with strings separated by commas. When the menu button is clicked, a popup menu is shown, with a sub menu

RE: [perl-win32-gui-users] A dynamic popup menu example

Is that because every time you create menu, you get a new handle? I have an app that does this very thing and I have noticed that it grows in memory also. Try doing a Data::Dumper of the object after each recreation to see if the handle is different. Also, what about the subs? I would

Re: [perl-win32-gui-users] A dynamic popup menu example

Partly because you get a new handle - being more specific, it's because perl does not destroy the menu (the object is stuffed in a global hash, so is never destroyed). If the object were to be destroy in perl, it would call the windows destructor which would release the memory - at least this