pgk. PGK ist ein Perl-GIMP-Kit, eine OO-Perl-GTK-Schnittstelle.
Jetzt downloaden

pgk. Ranking & Zusammenfassung

pgk. Stichworte

Perl-Modul Perl Gimpe Perl Gimp Kit OO Perl GTK-Schnittstelle PGK

pgk. Beschreibung

PGK ist ein Perl-GIMP-Kit, eine OO-Perl-GTK-Schnittstelle. PGK ist ein Perl-GIMP-Kit, ein OO-Perl-GTK-Schnittstelle.PGK :: WidgetNew ($ Name, $ TYPE) PRE: $ Name ist der Name dieses Widgets. $ type ist der Typ dieses Widgets. Post: Base Class PGK :: Widget erstellt, das implementiert Basisfunktionen für alle abgeleiteten PGK-Klassen Post: $ Widget wurde der Widgetliste von $ self.sethandle ($ Griff) PRE: $ Griff von PGK_XS C-Funktion hinzugefügt und ist ein Zeiger auf ein GTK-Widget. Post: $ Widget ist mit $-Griff verbunden. $ Griff = Gethandle () Vor: SetHandle (..) Beitrag: = Der GTK-Widget-Zeiger, der diesem PGK-Widget zugeordnet ist. Kann in Anrufen zu PGK_XS.SETEVENT ($ EVENTFUNC, $ EventType, ...) PRE: $ Eventype SetEvent verwendet werden ('Main :: LABELEVENT', 'CLICKED', $ DLG); Im Falle eines "geklickteten" Ereignisses für das $ Lab-Label, Main :: LABELEVENT wird mit Argument $ DLG aufgerufen. E.G., Felder in $ dlg können aktualisiert werden.Settimer ($ Millisecs, $ timerfunc, ...) Vor: Post: Timer ist für $ Millisecs für dieses Widget festgelegt. Nach $ Millisecs wird $ timerfunc mit Argumenten aufgerufen '...'. HINWEIS: TimerFunK gibt ein, für den Sie fortfahren, fortzufahren. TimerFunc gibt 0 zurück, um einen Aufruf aufzurufen. SMPL: My $ dlg = neuer PGK :: Dialog ('my_dialog', 'mein Titel', 2, 2); $ dlg-> Settimer (1000, 'Main :: UpdateTime', $ dlg); Packung Main; Sub-UpdateTime {mein $ -fenster = Schicht; meine $ time = cime (); $ fenster-> setvalue ($ time); Rückgabe 1; } addtimer ($ Millisecs, $ timerfunc, ...) Vor: Post: Timer wird dem aktuellen Widget hinzugefügt. Nach $ Millisecs heißt $ timerfunc mit Argumenten $ dies, '...'. HINWEIS: TimerFunK gibt ein, für den Sie fortfahren, fortzufahren. TimerFunc gibt 0 zurück, um einen Aufruf aufzurufen. SMPL: My $ dlg = neuer PGK :: Dialog ('my_dialog', 'mein Titel', 2, 2); $ dlg-> addtimer (1000, 'Main :: UpdateTime', "Mein zusätzliches Argument"); Packung Main; Sub-UpdateTime {My $ self = wechseln; meine $ txt = wechseln; meine $ time = cime (); $ selbst-> setvalue ($ time. "$ txt"); Rückgabe 1; } SetProp ($ prop, $ vari | @Value) Post: Property $ PROP von $ Widget wurde auf $ Wert eingestellt. SMPL: $ Widget-> SetProp ('myProp', "Mein Wert"); GetProp ($ Prop) Post: = Value of Property $ Requisite von $ Widget. SMPL: My $ T = $ Widget-> getprop ('myprop'); setwidget ($ Widget) Post: Setzt das Eigenschaft 'Widget'. $ Widget-> Name () bis $ widget.getwidget ($ name) Post: = Widget von $ Name, wenn SetWidget zuvor aufgerufen wurde. = undef, AndereWiseSetValue ($ value) Post: PGK :: Widget Base Class Implementiert diese Methode, indem er SetProp anruft ('Wert', $ Value) .getValue () Beitrag: PGK :: Widget Base Class Implementiert diese Methode, indem er getsprop (' Wert '). Show () Post: Zeigt alle mit dem aktuellen Widget verknüpften PGK-Widgets an, einschließlich dieses one.quit () -Posten: Beendet die Anwendung, zerstören alle PGK-Fenster geöffnet.name () Post: = Name des Widgets. Anforderungen: · Perl.

pgk. Zugehörige Software