{{ message }}
-
- Notifications You must be signed in to change notification settings
- Fork 418
Additional navigation options
PerllabelCacheMemberObj
Thomas Bonfort edited this page Apr 6, 2012
·
2 revisions
#!perl
my ($label,$box_minx,$box_miny,$box_maxx,$box_maxy,$text);
while ( $label = $map->nextLabel() ) { # ** labelCacheMemberObj **
if ( $label->{status} ) {
my $point = $label->{point};
$box_minx = $point->{x} - 15;
$box_miny = $point->{y} - 10;
$box_maxx = $point->{x} + 15;
$box_maxy = $point->{y} + 10;
$text = "String = $label->{string}";
}
}
---- back to PerlMapScrip
Wiki pages Pages 355
Clone this wiki locally
Footer
You can’t perform that action at this time.