PerlGtk.pl - Artykuły - Perl Tk

Perl Tk - część X
przez wrares (55 odsłon)
Używając GUI Buildera w trakcie prac nad formatkami, zauważyć można pojawiające się po lewej stronie grupy komponentów.... Są to dostępne moduły w zasobach CPAN które w sposób wizualny możemy umieszczać na formatce. Pozwalają planować swoje ułożenie w taki sposób, aby nie utracić nic ze swojej funkcjonalności. Dlatego warto poświęcić im czas i zapoznać się z ich możliwościami. Dziś podamy krótki przykład takiego komponentu, który pozwolił Nam przeglądać pliki zapisane w formacie XML. Docelowy program wygląda jak na poniższym zdjęciu..... Co musimy wykonać Cytat: 1) Zainstalować interesujący Nas komponent - a mianowicie XMLViewer... 2) Umieścić wizualizację widgetu na formatce 3) Dopisać kilka linijek kodu w Perlu 4) Uruchomić program W pliku perltk.pl dopisaliśmy `use Tk::XMLViewer; $top->title("Komponent z grupy Perl - Portla Perlgtk.pl"); $top->geometry('+100+100'); $top->resizable(0,0); perltk::ui($top); $xmlviewer->insertXML(-text => '<?xml version="1.0" encoding="ISO-8859-1" ?><a><bla /><foo>bar</foo></a>');` Przykład został zaczerpnięty z dokumentacji do tego modułu i jest dostępny w zasobach CPAN. Aby nadać pewną funkcjonalność aplikacji, dopisaliśmy lub zmieniliśmy 6 linijek kodu. To niewiele, zważywszy na to co otrzymujemy. Możemy także zamiast -text wpisać -file i wczytać zawartość pliku w formacie XML. Kod skryptu jest do pobrania tutaj...

Powrót