On Sun, 20 Jul 1997, Constantin Teodorescu wrote:
> Inside a vtcl program I call a user defined function that performs some
> tasks maybe 10 seconds or more. I want to show to the user that
> something is working there.
>
> How can I change the cursor to hourglass before entering the function
> and back again to arrow on exit ?
>
> Let's say, like in Visual Basic :
>
> "Screen.MousePointer = 11" (hourglass)
>
> Thanks in advance,
> Constantin Teodorescu
> FLEX Consulting Braila
> E-mail : [EMAIL PROTECTED]
>
This is what I do in TkGnats. It's not perfect but it's a start.
"headingMsg" just updates the status line with the given text.
headingMsg "Please Wait..."
. configure -cursor watch
# do your work here
after 2250 {headingMsg " " ; . configure -cursor left_ptr}
In my case the work is done in the background so I have no easy way
to know when it's complete. If you do it in the foreground, just code:
headingMsg " " ; . configure -cursor left_ptr
...RickM...
