summaryrefslogtreecommitdiffstats
path: root/PerlTQt/examples/progress
diff options
context:
space:
mode:
Diffstat (limited to 'PerlTQt/examples/progress')
-rw-r--r--PerlTQt/examples/progress/progress.pl16
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;