queries_p18.qry

  Download

More scripts: Style By Script

Syntax Highlighing:

comments, key words, predefined symbols, class members & methods, functions & classes
            
# From page 18 in the Building and Using Queries tutorial
# The style object set in Vector Layer Controls, Object tab must contain a polygon bitmap fill style named 'BitmapPatt2'
DrawBorder = 1;
DrawColor$ = "red";
if ( POLYSTATS.Area < 200000 )
then
   begin
      FillInside = 1;
      FillColor$ = "yellow";
   end
else
   begin
      FillInside = 1;
      FillBitmapPatt = 1;
      FillPatt$ = "BitmapPatt2";
   end