LINUXSOFT.cz Přeskoč levou lištu
Uživatel: Heslo:  
   CZUKPL

> Perl (123) - Gtk2 - základní práce s obrázky

Perl V druhém dílu série o Gtk2 budeme vkládat ikony do různých widgetů, avšak podíváme se též na obrázky obecně.

28.12.2010 00:00 | Jiří Václavík | Články autora | přečteno 6861×

Tlačítko ze stocku

Obyčejné tlačítko již vytvořit umíme. Stock je množina speciálních standardizovaných tlačítek. Jsou to tedy šablony, pomocí kterých můžeme tvořit tlačítka do našich aplikací. To v tomto případě znamená, že se zobrazí v tlačítku ještě nějaká ikona z používaného prostředí (například červený křížek pro tlačítko Zrušit apod.).

Seznam šablon pro tlačítka nalezneme v poli Gtk2::Stock->list_ids. Podívejme se na pár úvodních hodnot.

gtk-zoom-out
gtk-zoom-in
gtk-zoom-fit
gtk-zoom-100
gtk-yes
gtk-unindent
gtk-undo
gtk-underline
gtk-undelete
gtk-strikethrough
...

Abychom přesně věděli, o čem je řeč, podívejme se, jak jednotlivá stock tlačítka vypadají.

Stock tlačítka

Tato stock tlačítka se vytvářejí pomocí speciálního konstruktoru new_from_stock widgetu Gtk2::Button. Tomu předáváme vždy některý z řetězců z předchozího seznamu. Podívejme se, jak vytvoříme tlačítko Ano (na obrázku první sloupec, pátý řádek).

my $ano = Gtk2::Button->new_from_stock("gtk-yes");

Nyní s tímto tlačítkem již manipulujeme stejně jako s běžným tlačítkem.

Vlastní stock tlačítko

Poznamenejme, že do stocku lze definovat vlastní tlačítka. Ukažme si, jak se to provede. Základem je metoda add, kterou voláme nad třídou Gtk2::Stock.

Gtk2::Stock->add ({
     stock_id => "moje-vlastni-tlacitko",
     label    => "_Ahoj",
     keyval   => $Gtk2::Gdk::Keysyms{A},
});

Nyní se v seznamu Gtk2::Stock->list_ids objeví též moje-vlastni-tlacitko a můžeme s ním pracovat stejně jako s ostatními. Jinými slovy, můžeme nyní tlačítkovému konstruktoru new_from_stock předávat řetězec moje-vlastni-tlacitko.

Avšak v tuto chvíli nemáme u tlačítka žádnou ikonu. Zde nestačí přiřadit soubor, ale je to trochu složitější. Pro přiřazení ikony ze souboru ./ikona.png je třeba vykonat následující posloupnost příkazů.

$icon_factory = Gtk2::IconFactory->new;
$icon_factory->add("moje-vlastni-tlacitko", Gtk2::IconSet->new_from_pixbuf(
Gtk2::Gdk::Pixbuf->new_from_file("./ikona.png")));
$icon_factory->add_default;

Titulek okna a rohová ikona

Přidejme někam do našeho programu následující řádky. Máme-li v aktuálním adresáři nějaký obrázek v souboru ikona.png, uvidíme, že kód ovlivní hlavní lištu okna.

$okno->set_title("okno s ikonou :-)");
$okno->set_icon_from_file("./ikona.png");

Ikonu bychom neměli zapomenout nastavit u žádné aplikace, která půjde k uživatelům, protože taková věc je schopna udělat dobrý dojem.

Titulek okna s ikonou

Tlačítko s vlastním obrázkem

Pokud si nevybereme některé z přednastavených tlačítek a nechceme oklikou vytvářet nové stock tlačítko (protože chceme tlačítko použít jen jednorázově), můžeme vytvořit vlastní. To je podstatně jednodušší a obnáší to pouze vytvoření objektu obrázku a přiřazení ho tlačítku.

$tlacitko = Gtk2::Button->new("Klikni");
$obrazek = Gtk2::Image->new_from_file("./Ghost.png");
$tlacitko->set_property("image"=>$obrazek);

Poznamenejme, že pro čistě obrázková tlačítka samozřejmě stačí vynechat textový popisek a použít samotný obrázek.

Tlačítko s obrázkem

Práce s obrázky - zobrazování, škálování, ořezávání

Nejprve se podívejme na úplně nejzákaldnější věc - zobrazíme v okně obrázek ze souboru v aktuálním adresáři.

Vytvoříme tedy nejprve objekt $obrazek a ten (jakožto widget) standardně zobrazíme (například přidáme do okna). Zobrazování obrázků je základní funkcí grafické knihovny a proto to ani nemůže být něco náročného na psaní kódu.

$obrazek = Gtk2::Image->new_from_file("./obrazek.png");
$okno->add($obrazek);

Podívejme se ještě, jak z obrázku vytvořit buffer pixelů. Občas se to může hodit, jak uvidíme dále.

$raw = `cat ./obrazek.png`;
$pixbufloader = Gtk2::Gdk::PixbufLoader->new;
$pixbufloader->write($raw);
$pixbufloader->close; 
$pixbuf = $pixbufloader->get_pixbuf;

Odtud můžeme samozřejmě jít zase zpátky a vytvořit znovu Gtk2::Image.

$obrazek = Gtk2::Image->new_from_pixbuf($pixbuf);   

PixBuf můžeme škálovat. Pro změnu rozměrů obrázku na 500x500 metodou bilinear vyzkoušejme tento příkaz. Další metody škálování jsou v dokumentaci, avšak pro běžné účely vůbec nezáleží na tom, které škálování se provede.

$pixbuf = $pixbuf->scale_simple(500, 500, "bilinear") ;

Na závěr vyřízneme z obrázku kousek o velikosti 50x50, jehož horní levý roh má souřadnice 10, 10.

$pixbuf = $pixbuf->new_subpixbuf(10, 10, 50, 50); 

Změna kurzoru

Ještě neumíme pracovat s událostmi, avšak předběhněme trochu a podívejme se, jak lze měnit kurzorovou ikonu.

Signál enter se emituje po najetí myši na daný widget (hned zmiňme, že existuje též signál leave, který vyvolá tentokrát opuštění prostoru kurzorem myši). Zkusme po najetí do prostoru tlačítka změnit kurzor a nastavit ho na nějakou z hodnot typu Gtk2::Gdk::CursorType. Kurzor je objektem typu Gtk2::Gdk::Cursor a podle toho s ním také budeme zacházet. Nejprve ho vytvoříme a poté nastavíme.

$tlacitko = Gtk2::Button->new("1");
$tlacitko->signal_connect("enter" => sub {
    $tlacitko->window->set_cursor(Gtk2::Gdk::Cursor->new("man"));
});

Verze pro tisk

pridej.cz

 

DISKUZE

Nejsou žádné diskuzní příspěvky u dané položky.



Příspívat do diskuze mohou pouze registrovaní uživatelé.
> Vyhledávání software
> Vyhledávání článků

4.9.2016 20:13 /Pavel `Goldenfish' Kysilka
PR: Dne 22.9.2016 proběhne v Praze konference Cloud computing v praxi. Tématy bude např. nejnovější trendy v oblasti cloudu a cloudových řešení, provozování ERP v cloudu, o hostování různých typů softwaru, ale třeba i o zálohování dat nabízeném podnikům formou služby.
Přidat komentář

1.9.2016 11:27 /Honza Javorek
Česká konference o Pythonu, PyCon CZ, stále hledá přednášející skrz dobrovolné přihlášky. Máte-li zajímavé téma, neváhejte a zkuste jej přihlásit, uzávěrka je již 12. září. Konference letos přijímá i přednášky v češtině a nabízí pomoc s přípravou začínajícím speakerům. Řečníci mají navíc vstup zadarmo! Více na webu.
Přidat komentář

27.8.2016 8:55 /Delujek
Dnes po 4 letech komunitního vývoje vyšla diaspora 0.6.0.0
diaspora* je open-source, distribuovaná sociální síť s důrazem na soukromý
Více v oficiálním blog-postu
Přidat komentář

24.8.2016 6:44 /Ondřej Čečák
Poslední týden CFP LinuxDays 2016; pokud byste rádi přednášeli na LinuxDays 2016 8. a 9. října v Praze, můžete svůj příspěvek přihlásit, následovat bude veřejné hlasování.
Přidat komentář

9.8.2016 22:56 /Petr Ježek
Zařazení souborového systému reiser4 do jádra 4.7 znamená konečně konec patchování jádra jen kvůli možnosti použít reiser4.
Přidat komentář

12.7.2016 13:14 /František Kučera
Spolek OpenAlt zve na 130. distribuovaný sraz příznivců svobodného softwaru a otevřených technologií (hardware, 3D tisk, SDR, DIY, makers…), který se bude konat ve čtvrtek 21. července od 18:00 v Radegastovně Perón (Stroupežnického 20, Praha 5).
Přidat komentář

11.7.2016 16:53 /Redakce Linuxsoft.cz
Konference LinuxDays hledá přednášející. Přihlášky poběží do konce prázdnin, v září bude hlasování a program. Více na https://www.linuxdays.cz/2016/cfp/.
Přidat komentář

8.5.2016 17:19 /Redakce Linuxsoft.cz
PR: Dne 26.5.2016 proběhne v Praze konference Cloud computing v praxi. Tématy bude např. nejnovější trendy v oblasti cloudu a cloudových řešení, cloudové služby, infrastruktura cloudu, efektivní využití cloudu, možné nástrahy cloudů a jak se jim vyhnout
Přidat komentář

   Více ...   Přidat zprávičku

> Poslední diskuze

19.9.2016 21:04 / Marek Schoř
Poděkování

1.9.2016 13:07 / Walker
hardwood floor refinishing

12.8.2016 11:51 / Josef Zapletal
Jak udělat HTML/Javascript swiping gallery do mobilu?

8.8.2016 14:58 / Adams
fairies for hire

28.7.2016 15:51 / pepan
Re: NetBeans vs Eclipse

Více ...

ISSN 1801-3805 | Provozovatel: Pavel Kysilka, IČ: 72868490 (2003-2016) | mail at linuxsoft dot cz | Design: www.megadesign.cz | Textová verze