Hey,
maybe I'm to stupid to see the problem - but maybe it's a bug. I try to
take an Gnome::Canvas::Rect and put a Text on top - so far so good. They
belong to the same CanvasGroup and so I can rearange them as group.
The problems begin when I try to determin the bounding-box of the whole
group - I get the size of the text-bounging box:
my $item_group = Gnome2::Canvas::Item->new($root,
'Gnome2::Canvas::Group', x=>0.0, y=>0.0);
my $text = Gnome2::Canvas::Item->new($item_group,
'Gnome2::Canvas::Text',
text => $item->{id} . " - " . $item->{head},
x => 0,
y => 0,
font => 'Sans 12',
anchor => 'center');
my ($x1, $y1, $x2, $y2) = $text->get_bounds;
my $rect = Gnome2::Canvas::Item->new($item_group,
'Gnome2::Canvas::Rect',
x1=>$x1,
y1=>$y1,
x2=>$x2,
y2=>$y2,
outline_color=>'black',
fill_color=>'yellow',
width_units=>4.0);
$rect->lower(1);
No I query the bounding-box of each Item for the text-item I get
something sensible, for the group I get the same as for the text
(probably caused by missing box of the rect)
For the rect I get:
(0,0,0,0)
I would have expected something like:
($x1, $y1, $x2, $y2)
So shouldn't a Rect also have a bounding box?
Thanks
Matthias
--
Matthias Bläsing
ICQ: 84617206 AIM: linuxfun81 MSN: [EMAIL PROTECTED]
"Sicherheit nicht um jeden Preis! Die Freiheit hat den Vorrang!
GPG-Schlüsselkennung: A71B4BD5
_______________________________________________
gtk-perl-list mailing list
gtk-perl-list@gnome.org
http://mail.gnome.org/mailman/listinfo/gtk-perl-list
