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/opengl/box/glbox | |
| 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/opengl/box/glbox')
| -rw-r--r-- | PerlTQt/examples/opengl/box/glbox | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/PerlTQt/examples/opengl/box/glbox b/PerlTQt/examples/opengl/box/glbox index fed74a3..de7894d 100644 --- a/PerlTQt/examples/opengl/box/glbox +++ b/PerlTQt/examples/opengl/box/glbox @@ -23,7 +23,7 @@ sub NEW # Create a menu file = TQt::PopupMenu( this ); - file->insertItem( "Exit", TQt::app(), TQT_SLOT 'quit()', TQt::KeySequence(int &CTRL + &Key_Q )); + file->insertItem( "Exit", TQt::app(), TQ_SLOT 'quit()', TQt::KeySequence(int &CTRL + &Key_Q )); # Create a menu bar menu = TQt::MenuBar( this ); @@ -41,15 +41,15 @@ sub NEW # Create the three sliders; one for each rotation axis xpos = TQt::Slider ( 0, 360, 60, 0, &TQt::Slider::Vertical, this, "xsl" ); xpos->setTickmarks( &TQt::Slider::Left ); - TQt::Object::connect( xpos, TQT_SIGNAL 'valueChanged(int)', box, TQT_SLOT 'setXRotation(int)' ); + TQt::Object::connect( xpos, TQ_SIGNAL 'valueChanged(int)', box, TQ_SLOT 'setXRotation(int)' ); ypos = TQt::Slider ( 0, 360, 60, 0, &TQt::Slider::Vertical, this, "ysl" ); ypos->setTickmarks( &TQt::Slider::Left ); - TQt::Object::connect( ypos, TQT_SIGNAL 'valueChanged(int)', box, TQT_SLOT 'setYRotation(int)' ); + TQt::Object::connect( ypos, TQ_SIGNAL 'valueChanged(int)', box, TQ_SLOT 'setYRotation(int)' ); zpos = TQt::Slider ( 0, 360, 60, 0, &TQt::Slider::Vertical, this, "zsl" ); zpos->setTickmarks( &TQt::Slider::Left ); - TQt::Object::connect( zpos, TQT_SIGNAL 'valueChanged(int)', box, TQT_SLOT 'setZRotation(int)' ); + TQt::Object::connect( zpos, TQ_SIGNAL 'valueChanged(int)', box, TQ_SLOT 'setZRotation(int)' ); # Now that we have all the widgets, put them into a nice layout |