On Thursday 18 October 2007 21:42, Sisyphus wrote:
> ----- Original Message -----
> From: "Don VanSyckel" <[EMAIL PROTECTED]>
> To: <perl-win32-users@listserv.ActiveState.com>
> Sent: Sunday, June 10, 2007 11:13 AM
> Subject: Turn off the Progess bar
>
> >I have a small program that copies some file and uses the Progress Bar on
> >the
> > bottom of the TK window to display progress. When the copy is done I'd
> > like
> > to remove the Progress Bar and pop up a second windows saying copy done
> > with
> > an 'OK' to close it.
> >
> > I'm having problems figuring this out. Any suggestions?
>
> To create the pop-up, you could use Win32::MsgBox('message', 0, 'title').
> From 'perldoc Win32':
>
> -------------------------------------------
> Win32::MsgBox(MESSAGE [, FLAGS [, TITLE]])
> Create a dialogbox containing MESSAGE. FLAGS specifies the required
> icon and buttons according to the following table:
>
> 0 = OK
> 1 = OK and Cancel
> 2 = Abort, Retry, and Ignore
> 3 = Yes, No and Cancel
> 4 = Yes and No
> 5 = Retry and Cancel
>
> MB_ICONSTOP "X" in a red circle
> MB_ICONQUESTION question mark in a bubble
> MB_ICONEXCLAMATION exclamation mark in a yellow triangle
> MB_ICONINFORMATION "i" in a bubble
>
> TITLE specifies an optional window title. The default is "Perl".
>
> The function returns the menu id of the selected push button:
>
> 0 Error
>
> 1 OK
> 2 Cancel
> 3 Abort
> 4 Retry
> 5 Ignore
> 6 Yes
> 7 No
>
> -------------------------------------------
>
> Cheers,
> Rob
>
> _______________________________________________
> Perl-Win32-Users mailing list
> Perl-Win32-Users@listserv.ActiveState.com
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Thanks, I'll try this tomorrow for a pop up.
Don
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
