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-11 09:56:53 +0900 |
| commit | 947bc2dba5274c3a87dd0f3dc29972b5a7fde80f (patch) | |
| tree | 8dece4fa4ebb9fa43f8660095f8084ea580ee2eb /doc/en | |
| parent | bb06ec358695c7621148fd6cf0c2af94fd29f799 (diff) | |
| download | libtqt-perl-947bc2dba5274c3a87dd0f3dc29972b5a7fde80f.tar.gz libtqt-perl-947bc2dba5274c3a87dd0f3dc29972b5a7fde80f.zip | |
Use new TQ_METHOD, TQ_SIGNAL, TQ_SLOT defines
Signed-off-by: Michele Calgaro <michele.calgaro@yahoo.it>
(cherry picked from commit 301b5380792b7a368488aa485d3bdb3df81e0808)
Diffstat (limited to 'doc/en')
| -rw-r--r-- | doc/en/PerlQt.pod | 14 | ||||
| -rw-r--r-- | doc/en/index.html | 14 |
2 files changed, 14 insertions, 14 deletions
diff --git a/doc/en/PerlQt.pod b/doc/en/PerlQt.pod index 592fccc..ebc1fa5 100644 --- a/doc/en/PerlQt.pod +++ b/doc/en/PerlQt.pod @@ -489,12 +489,12 @@ component. The general syntax of this connection process is either : -TQt::Object::connect( sender, TQT_SIGNAL 'mysignal(arg_type)', -receiver, TQT_SLOT 'myslot(arg_type)'); +TQt::Object::connect( sender, TQ_SIGNAL 'mysignal(arg_type)', +receiver, TQ_SLOT 'myslot(arg_type)'); or -myObject->connect( sender, TQT_SIGNAL 'mysignal(arg_type)', TQT_SLOT +myObject->connect( sender, TQ_SIGNAL 'mysignal(arg_type)', TQ_SLOT 'myslot(arg_type)'); This mechanism can be extended at will by the declaration of custom Signals and @@ -523,8 +523,8 @@ B<As an example, lets rewrite again our Button package :> 15: shift->SUPER::NEW(@_[0..2]); 16: itsTime = TQt::Time; 17: itsTime->start; - 18: this->connect(this, TQT_SIGNAL 'clicked()', TQT_SLOT 'wasClicked()'); - 19: this->connect(this, TQT_SIGNAL 'changeIt(int,int)', TQT_SLOT 'change(int,int)'); + 18: this->connect(this, TQ_SIGNAL 'clicked()', TQ_SLOT 'wasClicked()'); + 19: this->connect(this, TQ_SIGNAL 'changeIt(int,int)', TQ_SLOT 'change(int,int)'); 20: } 21: 22: sub wasClicked @@ -558,7 +558,7 @@ slot with two arguments. Finally, since PerlTQt-3.008, an alternative syntax can be used to declare Signals and Slots: - sub a_slot : TQT_SLOT(int, TQString) + sub a_slot : TQ_SLOT(int, TQString) { $int = shift; $string = shift; @@ -567,7 +567,7 @@ Finally, since PerlTQt-3.008, an alternative syntax can be used to declare Signa and - sub a_signal : TQT_SIGNAL(TQString); + sub a_signal : TQ_SIGNAL(TQString); This syntax is perfectly compatible with the traditional C<use TQt::signals> and C<use TQt::slots> declarations. diff --git a/doc/en/index.html b/doc/en/index.html index e6cfde1..f4f0572 100644 --- a/doc/en/index.html +++ b/doc/en/index.html @@ -469,10 +469,10 @@ several input <strong>Slots</strong> - and each signal can be connected to an un of listening slots of the same type, wether they are inside or outside the component.</p> <p>The general syntax of this connection process is either :</p> -<p>TQt::Object::connect( sender, TQT_SIGNAL 'mysignal(arg_type)', -receiver, TQT_SLOT 'myslot(arg_type)');</p> +<p>TQt::Object::connect( sender, TQ_SIGNAL 'mysignal(arg_type)', +receiver, TQ_SLOT 'myslot(arg_type)');</p> <p>or</p> -<p>myObject->connect( sender, TQT_SIGNAL 'mysignal(arg_type)', TQT_SLOT +<p>myObject->connect( sender, TQ_SIGNAL 'mysignal(arg_type)', TQ_SLOT 'myslot(arg_type)');</p> <p>This mechanism can be extended at will by the declaration of custom Signals and Slots, through the <code>use TQt::signals</code> and <code>use TQt::slots</code> pragma @@ -498,8 +498,8 @@ each declared signal can be raised through the <strong>emit</strong> keyword.</p 15: shift->SUPER::NEW(@_[0..2]); 16: itsTime = TQt::Time; 17: itsTime->start; - 18: this->connect(this, TQT_SIGNAL 'clicked()', TQT_SLOT 'wasClicked()'); - 19: this->connect(this, TQT_SIGNAL 'changeIt(int,int)', TQT_SLOT 'change(int,int)'); + 18: this->connect(this, TQ_SIGNAL 'clicked()', TQ_SLOT 'wasClicked()'); + 19: this->connect(this, TQ_SIGNAL 'changeIt(int,int)', TQ_SLOT 'change(int,int)'); 20: } 21: 22: sub wasClicked @@ -528,7 +528,7 @@ the <code>changeIt(int,int)</code> signal [l.27], hence triggering the <code>cha slot with two arguments.</p> <p>Finally, since PerlTQt-3.008, an alternative syntax can be used to declare Signals and Slots:</p> <pre> - sub a_slot : TQT_SLOT(int, TQString) + sub a_slot : TQ_SLOT(int, TQString) { $int = shift; $string = shift; @@ -536,7 +536,7 @@ slot with two arguments.</p> }</pre> <p>and</p> <pre> - sub a_signal : TQT_SIGNAL(TQString);</pre> + sub a_signal : TQ_SIGNAL(TQString);</pre> <p>This syntax is perfectly compatible with the traditional <code>use TQt::signals</code> and <code>use TQt::slots</code> declarations.</p> <p>Eventually, it can prove good programming practice to mix both syntaxes, by first declaring |
