Opened by michael25 at 2005-09-03 18:46
User since
2005-08-31
23 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-08-31
23 Artikel
BenutzerIn
Hallo,
wie kann ich die Größe eines Bildes (GIF) im Canvas ermitteln? Folgender Code liefert immer 0,0, obwohl das Bild einwandfrei gezeichnet wird.
Noch besser wäre es, wenn man die Bildgröße direkt über das Canvas-Objekt herausfinden könnte, also z. B. so:
$canvas->itemcget($id, -height)
Das schlägt aber fehl, da es die Option -height nicht gibt.
Wie könnte man das anstellen?
Der Code stammt übrigens aus einem Widget, das von Tk::Canvas abgeleitet wurde.
Michael
wie kann ich die Größe eines Bildes (GIF) im Canvas ermitteln? Folgender Code liefert immer 0,0, obwohl das Bild einwandfrei gezeichnet wird.
Code: (dl
)
1
2
3
4
my $filename = 'bild.gif';
my $image = $self->Photo(-file => $filename);
print $image->cget(-height), ",", $image->cget(-width);
$canvas->createImage($x, $y, -image => $image);
Noch besser wäre es, wenn man die Bildgröße direkt über das Canvas-Objekt herausfinden könnte, also z. B. so:
$canvas->itemcget($id, -height)
Das schlägt aber fehl, da es die Option -height nicht gibt.
Wie könnte man das anstellen?
Der Code stammt übrigens aus einem Widget, das von Tk::Canvas abgeleitet wurde.
Michael