Changes between Initial Version and Version 1 of PerlpointObj
- Timestamp:
- Jan 29, 2009, 10:45:21 AM (15 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
PerlpointObj
v1 v1 1 = pointObj = 2 {{{ 3 #!perl 4 $point = new mapscript::pointObj(); 5 6 $point->{x} = 100; 7 8 $pointx = $point->{x}; 9 $pointy = $point->{y}; 10 11 my $distance = $point->distanceToPoint($garagepoint); 12 13 $point->project($in_proj,$out_proj); 14 15 my $point = $label->{point}; 16 17 $box_minx = $point->{x} - 15; 18 19 $line->add($point); 20 }}} 21 ---- 22 back to PerlMapScript