vyklad kodu

[Jan Kasprzak]

Ondrej Koala Vacha wrote:
: 
: 
: Dobry den, nize je uveden vzorovy priklad na perlQt. Nejde mi ted o Qt,
: ale o syntaxi:
: 
:   1: use strict;
:   2:
:   3: package Button;
:   4: use Qt;
:   5: use Qt::isa qw(Qt::PushButton);
:   6: use Qt::attributes qw(itsTime);
:   7: use Qt::slots
:   8:     wasClicked => [],
:   9:     change     => ['int', 'int'];
:  10: use Qt::signals
:  11:     changeIt   => ['int', 'int'];
:  12:
:  13: sub NEW
:  14: {
:  15:   shift->SUPER::NEW(@_[0..2]);
:  16:   itsTime = Qt::Time;
:  17:   itsTime->start;
:  18:   this->connect(this, SIGNAL 'clicked()', SLOT 'wasClicked()');
:  19:   this->connect(this, SIGNAL 'changeIt(int,int)', SLOT 'change(int,int)');
:  20: }
: 
: 
: Muze mi nekdo rozebrat, co se deje na radku 16, tedy co je itsTime? Pokud
: je to jasne a mne to nedochazi, tak si dopredu pisu cerny bod:(

	A neni to nejaka funkce/subrutina? Co rekne

print ref itsTime

?

-Y.

-- 
| Jan "Yenya" Kasprzak  <kas at {fi.muni.cz - work | yenya.net - private}> |
| GPG: ID 1024/D3498839      Fingerprint 0D99A7FB206605D7 8B35FCDE05B18A5E |
| http://www.fi.muni.cz/~kas/   Czech Linux Homepage: http://www.linux.cz/ |
|  I actually have a lot of admiration and respect for the PATA knowledge  |
| embedded in drivers/ide. But I would never call it pretty:) -Jeff Garzik |