Changes between Initial Version and Version 1 of layerObj

Timestamp:

Jan 29, 2009, 10:17:37 AM (15 years ago)

Author:

jmckenna

Comment:

--

layerObj

@@ +1 @@
+= layerObj =
+{{{
+#!perl
+$layer = new mapscript::layerObj($map);
+
+$num_classes = $layer->{numclasses};
+
+$result_cache = $layer->{resultcache};
+
+$qryresult = $layer->queryByPoint($map,$point,$mapscript::MS_SINGLE,0);
+
+$resultmember = $layer->getResult(0);
+
+$query = "(([AREA]>500000 AND [AREA]<=1000000) AND ([CODE]=311 OR [CODE]=312))";
+$layer->setFilter($query);
+
+my $layer = $map->getLayerByName('parcel');
+
+$layer->{status} = $mapscript::MS_ON;
+
+$layer->{data} = "$scan.tif";
+
+$layer->{transparency} = 100;
+
+my $class = $layer->getClass(0);
+
+my $query_status = $st_poly_layer->queryByRect($map,$rectang);
+my $result_mem = $st_poly_layer->getResult(0);
+my $result_cache = $st_poly_layer->{resultcache};
+
+my $sing_layer_idx = $sing_layer->{index};
+$sing_layer->queryByRect($map,$rectang); # ** set of results **
+$prcl_dim_layer->queryByFeatures($map,$sing_layer_idx);
+}}}
+----
+back to PerlMapScript