Quintiq file version 2.0
|
#parent: GISComponent
|
Response OnDetermineObjectCharacteristics (
|
Unit object
|
) id:Response_GISComponent_OnDetermineObjectCharacteristics_222
|
{
|
#keys: '[110880.6.659185898]'
|
Body:
|
[*
|
// Show unit (GIS 2.0)
|
// MODELING HANDLE to switch to PTV: Change the srsMap variable to create a SRS of PTV map
|
|
selected := guard( object.GIS_UnitAddress().GIS_UnitGeocodeResult().Selected(), null( LibGIS_GeocodedAddress ) );
|
|
if( not isnull( selected ) )
|
{
|
// Unable to retrieve SRS from GIS Component as this response is triggered before the SRS value of GIS Component has a value.
|
// Presumably the SRS value is set after this response is called. Therefore the SRS value has to be hard-coded.
|
//srsMap := SpatialReferenceSystem::CreateFromWKT( GISComponentOSMMap.SpatialReferenceSystemWKT() );
|
srsMap := SpatialReferenceSystem::CreateFromEPSG( 3857 );
|
srsLoc := SpatialReferenceSystem::CreateFromWKT( selected.SRS() );
|
coor := GIS2DCoordinate::Create( selected.X(), selected.Y() );
|
mapCoor := GIS2DCoordinateConverter::Convert( srsLoc, coor, srsMap );
|
|
point := creator.AddPoint( mapCoor.X(), mapCoor.Y() );
|
point.Shape( "Square" );
|
point.BorderWidth( 1 );
|
point.BackgroundColor( Color::Red() );
|
point.Diameter( 12 );
|
}
|
*]
|
CanBindMultiple: false
|
DefinitionID: 'Responsedef_GISComponent_OnDetermineObjectCharacteristics'
|
}
|
