Description

Mutually isolates unit preference settings in the current instance from those in other instances of the root.

Syntax

[Visual Basic .NET]
Public Sub Isolate()

[Visual Basic .NET]

Public Sub Isolate()

[C#]
public void Isolate();

[C#]

public void Isolate();

[Managed C++]
public: void Isolate();

[Managed C++]

public: void Isolate();

[Java]
public isolate();

[Java]

public  isolate();

[Unmanaged C++]
public: HRESULT Isolate();

[Unmanaged C++]

public: HRESULT Isolate();

Example

Isolate Unit Preferences when using multiple IAgStkObjectRoot objects

[C#] Copy Code

Isolate Unit Preferences when using multiple IAgStkObjectRoot objects

[Visual Basic .NET] Copy Code

' First
root configured to use km

Dim root1 As IAgStkObjectRoot = New AgStkObjectRootClass()

root1.UnitPreferences.SetCurrentUnit("Distance", "km")



' Second root configured to use
miles

Dim root2 As IAgStkObjectRoot = New AgStkObjectRootClass()

root2.Isolate()

root2.UnitPreferences.SetCurrentUnit("Distance", "mi")



' Create new scenario and ship
object

' Close current scenario

If root1.CurrentScenario IsNot
Nothing Then

    root1.CloseScenario()

End If

root1.NewScenario("Test")

root1.CurrentScenario.Children.[New](AgESTKObjectType.eShip,
"Ship1")



' Obtain references to the ship object from
each root

Dim shipFromRoot1 As IAgShip =
TryCast(root1.GetObjectFromPath("Ship/Ship1"), IAgShip)

Dim shipFromRoot2 As IAgShip =
TryCast(root2.GetObjectFromPath("Ship/Ship1"), IAgShip)



shipFromRoot1.SetRouteType(AgEVePropagatorType.ePropagatorGreatArc)



Dim greatArcFromRoot1 As IAgVePropagatorGreatArc =
TryCast(shipFromRoot1.Route, IAgVePropagatorGreatArc)

Dim greatArcFromRoot2 As IAgVePropagatorGreatArc =
TryCast(shipFromRoot2.Route, IAgVePropagatorGreatArc)



Dim waypointsFromRoot1 As IAgVeWaypointsElement =
greatArcFromRoot1.Waypoints.Add()



waypointsFromRoot1.Altitude = 1

' 1 km

Dim waypointsFromRoot2 As IAgVeWaypointsElement =
greatArcFromRoot2.Waypoints.Add()



waypointsFromRoot2.Altitude = 1

' 1 mile

greatArcFromRoot1.Propagate()



Dim i As
Integer = 1

For Each
wpt As IAgVeWaypointsElement
In greatArcFromRoot1.Waypoints

    Console.WriteLine("Point #{0} Altitude {1} {2}", i, wpt.Altitude,
root1.UnitPreferences.GetCurrentUnitAbbrv("Distance"))

    System.Threading.Interlocked.Increment(i)

Next

Console.WriteLine()



'Sample Output

'Point #1 Altitude 1 km

'Point #2 Altitude 1.609344 km



i = 1

For Each
wpt As IAgVeWaypointsElement
In greatArcFromRoot2.Waypoints

    Console.WriteLine("Point #{0} Altitude {1} {2}", i, wpt.Altitude,
root2.UnitPreferences.GetCurrentUnitAbbrv("Distance"))

    System.Threading.Interlocked.Increment(i)

Next



'Sample Output

'Point #1 Altitude 0.621371192237334
mi

'Point #2 Altitude 1 mi



root1.CloseScenario()

AGI STK Objects 11	Send comments on this topic.
Isolate Method (IAgStkObjectRoot)
See Also Example

Description

Syntax

Example

See Also