Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re: Block Tk GUI while doing a process

by Anonymous Monk
on Jul 01, 2019 at 21:06 UTC ( [id://11102273]=note: print w/replies, xml ) Need Help??


in reply to Block Tk GUI while doing a process

Thank you for the suggestions! The GUI does remain reactive because I use $mw->update; while downloading the file in order to update a Progressbar.

I opted for a quite easy solution which shows a top window with a grab until the download process is completed.

my $tl = $mw->Toplevel( -title => 'WAIT' ); $tl->resizable( 0, 0 ); $tl->transient($tl->Parent->toplevel); $tl->protocol('WM_DELETE_WINDOW' => sub {}); $tl->grab; my $image_file = "wait.jpg"; my $splashphoto = $tl->{Photo} = $tl->Photo(-file => $image_file); $tl->Label(-image => $splashphoto, -bd => 0)->pack(-fill => 'both' +, -expand => 1);

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://11102273]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others studying the Monastery: (8)
As of 2024-03-28 12:28 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found