TGIS_Shape.Flash(Integer; Integer) method

DK for Delphi | GisLayerVector.TGIS_Shape.Flash | Overloads | Constructors | Fields | Methods | Properties

Flashes the shape in the viewer using custom repetition and delay values.

Available also on: .NET | Java | ActiveX | Python.

// Delphi
public
  procedure Flash(
    const _times : Integer;
    const _delay : Integer
  ); overload; virtual;

// C++ Builder
public:
  virtual void Flash(
    const int _times,
    const int _delay
  ) /* overload */;

PURPOSE: Provides temporary visual highlighting with application-defined timing, for example to emphasize alerts or selected features.

BEHAVIOR: Flashes the shape _times times with _delay milliseconds between changes. Actual rendering depends on the associated viewer implementation.

CONSTRAINTS: Requires the shape to be associated with a valid viewer that supports flashing.

procedure MyClass.GISMouseDown( Sender: TObject; Button: TMouseButton;
                                Shift: TShiftState; X, Y: Integer );
var
  ptg : TGIS_Point ;
  shp : TGIS_Shape ;
begin
  ptg := GIS.ScreenToMap( Point(x, y ) );
 
  // locate a shape with 5 pixels precision
  shp := TGIS_Shape( GIS.Locate( ptg, 5/GIS.Zoom ) );
 
  // let's flash the shape if found
  if shp <> nil then
     shp.Flash;
end;