diff options
| author | Michele Calgaro <michele.calgaro@yahoo.it> | 2024-01-10 10:12:24 +0900 |
|---|---|---|
| committer | Michele Calgaro <michele.calgaro@yahoo.it> | 2024-01-10 10:12:24 +0900 |
| commit | 301b5380792b7a368488aa485d3bdb3df81e0808 (patch) | |
| tree | 02f29183ad7d160b896f76ba08c916e3c97f6226 /PerlTQt/examples/progress | |
| parent | 6c02673b584fd4fbd4761057a5b466bca26036bd (diff) | |
| download | libtqt-perl-301b5380792b7a368488aa485d3bdb3df81e0808.tar.gz libtqt-perl-301b5380792b7a368488aa485d3bdb3df81e0808.zip | |
Use new TQ_METHOD, TQ_SIGNAL, TQ_SLOT defines
Signed-off-by: Michele Calgaro <michele.calgaro@yahoo.it>
Diffstat (limited to 'PerlTQt/examples/progress')
| -rw-r--r-- | PerlTQt/examples/progress/progress.pl | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/PerlTQt/examples/progress/progress.pl b/PerlTQt/examples/progress/progress.pl index 4112e64..bec202c 100644 --- a/PerlTQt/examples/progress/progress.pl +++ b/PerlTQt/examples/progress/progress.pl @@ -158,18 +158,18 @@ sub NEW menubar->insertItem( "&File", file ); for (my $i=first_draw_item; $i<=last_draw_item; $i++) { file->insertItem( drawItemRects($i)." Rectangles", $i) } - TQt::Object::connect( menubar, TQT_SIGNAL "activated(int)", this, TQT_SLOT "doMenuItem(int)" ); + TQt::Object::connect( menubar, TQ_SIGNAL "activated(int)", this, TQ_SLOT "doMenuItem(int)" ); file->insertSeparator; - file->insertItem( "Quit", TQt::app(), TQT_SLOT "quit()" ); + file->insertItem( "Quit", TQt::app(), TQ_SLOT "quit()" ); options = TQt::PopupMenu; menubar->insertItem( "&Options", options ); - td_id = options->insertItem( "Timer driven", this, TQT_SLOT "timerDriven()" ); - ld_id = options->insertItem( "Loop driven", this, TQT_SLOT "loopDriven()" ); + td_id = options->insertItem( "Timer driven", this, TQ_SLOT "timerDriven()" ); + ld_id = options->insertItem( "Loop driven", this, TQ_SLOT "loopDriven()" ); options->insertSeparator; - dl_id = options->insertItem( "Default label", this, TQT_SLOT "defaultLabel()" ); - cl_id = options->insertItem( "Custom label", this, TQT_SLOT "customLabel()" ); + dl_id = options->insertItem( "Default label", this, TQ_SLOT "defaultLabel()" ); + cl_id = options->insertItem( "Custom label", this, TQ_SLOT "customLabel()" ); options->insertSeparator; - md_id = options->insertItem( "No minimum duration", this, TQT_SLOT "toggleMinimumDuration()" ); + md_id = options->insertItem( "No minimum duration", this, TQ_SLOT "toggleMinimumDuration()" ); options->setCheckable( 1 ); loopDriven(); customLabel(); @@ -301,7 +301,7 @@ sub draw pb = newProgressDialog("Drawing rectangles.\n". "Using timer event.", $n, 0); pb->setCaption("Please Wait"); - TQt::Object::connect(pb, TQT_SIGNAL "cancelled()", this, TQT_SLOT "stopDrawing()"); + TQt::Object::connect(pb, TQ_SIGNAL "cancelled()", this, TQ_SLOT "stopDrawing()"); enableDrawingItems(0); startTimer(0); got_stop = 0; |