Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

perl tkx question

Posted on 2009-05-12
1
Medium Priority
?
1,127 Views
Last Modified: 2012-06-27
I am trying make a message box that have a yes and no but the message box yes no button must be clickable

can some one point me in the right direction
0
Comment
Question by:1030071002
1 Comment
 

Accepted Solution

by:
1030071002 earned 0 total points
ID: 24371693
#!/usr/local/bin/perl
use Tkx;

# Main Window
my $mw = new MainWindow;
my $button = $mw-<Button(-text=<"Show Quit Dailog", -command =< \&exitTheApp)-<pack();

sub exitTheApp {
Tkx::$response = $mw -< messageBox(-message=<"Are you sure you want to quit and giving me the choice of Yes or No",-type=<'yesno',-icon=<'question');
      
      if( $response eq "Yes" ) {
            exit
      } else {
            $mw -< messageBox(-type=<"ok", -message=<"I know you like this application!");
      }
}

MainLoop;


 Tkx::tk___messageBox(-parent => $mw,-icon => "info",-title => "Tip of the Day",-message => "Please be nice!",);


0

Featured Post

VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In the distant past (last year) I hacked together a little toy that would allow a couple of Manager types to query, preview, and extract data from a number of MongoDB instances, to their tool of choice: Excel (http://dilbert.com/strips/comic/2007-08…
Checking the Alert Log in AWS RDS Oracle can be a pain through their user interface.  I made a script to download the Alert Log, look for errors, and email me the trace files.  In this article I'll describe what I did and share my script.
Explain concepts important to validation of email addresses with regular expressions. Applies to most languages/tools that uses regular expressions. Consider email address RFCs: Look at HTML5 form input element (with type=email) regex pattern: T…
Six Sigma Control Plans

783 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question