PGK. PGK è un kit GIMP perl, un'interfaccia GTK OO Perl.
Scarica ora

PGK. Classifica e riepilogo

PGK. Tag

modulo Perl perl Glim Kit GIMP perl Interfaccia OO Perl GTK PGK.

PGK. Descrizione

PGK è un kit GIMP perl, un'interfaccia GTK OO Perl. PGK è un kit GIMP perl, un'interfaccia GTK OO Perl.pgk :: widgetNew ($ NOME, $ TYPE) Pre: $ Name è il nome di questo widget. $ Tipo è il tipo di questo widget. Post: Base Class PGK :: Widget creato, che implementa funzioni base per tutte le classi PGK derivate.Aggiungi ($ widget) pre: $ widget è un derivato di PGK :: widget. Post: $ widget è stato aggiunto al widgetlist di $ self.sethandle ($ maniglia) pre: ottenuto $ maniglia da PGK_XS C-Function ed è un puntatore in un widget GTK. Post: $ widget è associato a $ maniglia. $ maniglia = gethandle () pre: sethandle (..) Post: = il puntatore del widget GTK associato a questo widget PGK. Può essere utilizzato in chiamate a pgk_xs.sevent ($ eventfunc, $ eventtype, ...) pre: $ eventtype setEvent ('Main :: Labreavent', 'cliccato', $ DLG); In caso di un evento "cliccato" per l'etichetta $ lab, principale :: Label Lablatevent sarà chiamato con l'argomento $ DLG. E.G., i campi in $ DLG possono essere aggiornati.settimer ($ millisecs, $ timerfunc, ...) pre: post: Timer è impostato per $ millisecs per questo widget. Dopo $ millisecs, $ timerfunc è chiamato con argomenti "...". Nota: TimerFunc returns 1 per continuare a chiamare. Timerfunc returns 0 per una chiamata a un colpo. SMPL: My $ DLG = New PGK :: dialog ::: "my_dialog", "il mio titolo", 2, 2); $ DLG-> Settimer (1000, 'Main :: updateTime', $ DLG); pacchetto principale; Sub updatetime {My $ window = shift; My $ Time = ctime (); $ finestra-> setValue ($ tempo); ritorno 1; } Addtimer ($ millisecs, $ timerfunc, ...) Pre: Post: Timer viene aggiunto al widget corrente. Dopo $ millisecs, $ timerfunc è chiamato con argomenti $ questo, '...'. Nota: TimerFunc returns 1 per continuare a chiamare. Timerfunc returns 0 per una chiamata a un colpo. SMPL: My $ DLG = New PGK :: dialog ::: "my_dialog", "il mio titolo", 2, 2); $ DLG-> Addtimer (1000, 'Main :: updatetime', "il mio argomento extra"); pacchetto principale; sub updatetime {my $ self = shift; il mio $ txt = shift; My $ Time = ctime (); $ self-> setValue ($ tempo. "$ txt"); ritorno 1; } SetProp ($ Prop, $ Value | @Value) Post: Property $ Prop di $ widget è stato impostato su $ Value. SMPL: $ widget-> setprop ('MyProp', "My Value"); GetProp ($ Prop) Post: = Valore della proprietà $ Prop di $ widget. SMPL: My $ T = $ widget-> getprop ('myprop'); setwidget (widget $) Post: imposta la proprietà 'widget'. $ widget-> nome () a $ widget.getwidget ($ name) post: = widget di $ NOME, se SetWidget è stato chiamato prima. = Undef, altriWisesetValue ($ Value) Post: PGK :: Classe base widget implementa questo metodo chiamando SetProp ('Value', $ Value) .GetValue () Post: PGK :: La classe base widget implementa questo metodo chiamando GetProp (' valore '). Mostra () Post: Mostra tutti i widget PGK associati al widget corrente, incluso questo one.quit () Post: chiusa l'applicazione, distruggendo tutti i PGK Windows Opened.Name () Post: = Nome del widget. Requisiti: · Perl.

PGK. Software correlato