I don't know if that's the reason for your going batty, but your $logbox control doesn't have a name. That's a big no-no. You call DoEvents for the first time and GUI doesn't know where to mail the Resize or Show events. Maybe that's what causes it to screech, maybe not.
Have fun, Harald | -----Original Message----- | From: Morbus Iff [mailto:[EMAIL PROTECTED] | Sent: Thursday, April 26, 2001 14:35 | To: perl-win32-gui-users@lists.sourceforge.net | Subject: [perl-win32-gui-users] DoEvents and Uninit's... | | | Hey there... this is driving me flippin' batty. I've included | a GUI layer | library below that can be dropped into an existing program | (currently, the | one I'm using it with is AmphetaDesk at disobey.com/amphetadesk/). | | Besides some uninit's that I know about and plan on fixing, | I'm getting | uninit's *every single time* that the DoEvents is called. The | specific | lines are 130 and 160, which match up to these blocks: | | sub gui_listen { | | # anyone there? | Win32::GUI::PeekMessage(0,0,0); | Win32::GUI::DoEvents(); | | return 1; | } | | The error is the normal "use of unitialized value" junk, and | it points | strictly to the DoEvents line. | | What am I doing wrong? How can I make 'em go away? |
