Здравствуйте Peter,
Wednesday, August 03, 2005, 7:10:55 PM, Вы написали:
>> Здравствуйте, perl-win32-gui-users,
>> I wrote simple script with timer. It's supposed that timer
>> hides/shows main window but window is always visible. What's the
>> matter?
PE> Your if() logic in CheckDir_Timer sub. If you look closely, you will see
PE> that the window gets hidden and then shown again immediately after. You tell
PE> it to Hide if visible and immediately after you tell it to show if it is
PE> not. Try this one instead:
PE> sub CheckDir_Timer {
if ($mw->>IsVisible())
PE> {
PE> $mw->Hide();
PE> }
PE> else
PE> {
PE> $mw->Show();
PE> }
PE> return 1;
PE> }
You absolutely right. It was stupid mistake. But! Timer do not work as
before though I declared $mw as our (not my) (Steve Lloyd advice) and
corrected event handler. It's like that handler not executed at all.
I have Win32-GUI 1.02, perl 5.8.6 and Windows98SE
--
С уважением,
Сергей mailto:[EMAIL PROTECTED]
