ApproachSegment.WithInsertedLeg

Eigenschaft	Wert
Modul	FlightPlan
Klasse	ApproachSegment
Typ	Function
Sichtbarkeit	Public
Datei	FlightPlan/FlightPlanModels.vb

Beschreibung

Fuegt ein neues Leg nach dem angegebenen Index in das ApproachSegment ein und gibt ein neues ApproachSegment zurueck. Die bestehende Leg-Liste wird kopiert, das neue Leg an Position afterIndex+1 eingefuegt. Das urspruengliche Segment bleibt unveraendert (immutable).

Signatur

Public Function WithInsertedLeg(afterIndex As Integer, leg As FlightPlanLeg) As ApproachSegment

Parameter

Name	Typ	Beschreibung	Standard
afterIndex	Integer	Index, nach dem das neue Leg eingefuegt wird (0-basiert); -1 = am Anfang einfuegen	—
leg	FlightPlanLeg	Das einzufuegende Leg	—

Rückgabewert

Typ	Beschreibung
ApproachSegment	Neues ApproachSegment mit dem eingefuegten Leg

Ablaufdiagramm

flowchart TD
    A[Start] --> B[Legs-Liste kopieren]
    B --> C["Neues Leg an Position afterIndex+1 einfuegen"]
    C --> D[Neues ApproachSegment mit erweiterter Liste erstellen]
    D --> E[Neues ApproachSegment zurueckgeben]

Aufgerufen von

Modul	Sub/Function	Kontext
FlightPlanModels	FlightPlan.InsertWaypoint	Einfuegen in den Approach-Bereich bei globalem Index im Approach-Bereich

Ruft auf

Modul	Sub/Function	Kontext
FlightPlanModels	ApproachSegment.New(IEnumerable)	Erzeugt neues Segment mit der aktualisierten Leg-Liste

Beispiel

Dim appLegs = {
    New FlightPlanLeg("CF26L", 48.3, 11.7, "CF", "", 260.0, 0.0, 0.0, 0.0, 8.0, 0.0, 0.0,
        0, "@", 3000, 0, 0, False, 0, False, "", FlightPlanLegType.Approach)
}
Dim seg As New ApproachSegment(appLegs)

Dim newLeg As New FlightPlanLeg("FINAL", 48.33, 11.75, "TF", "", 260.0, 0.0, 0.0, 0.0, 3.0, 0.0, 0.0,
    0, "@", 2000, 0, 0, False, 0, False, "", FlightPlanLegType.Approach)

Dim updated = seg.WithInsertedLeg(0, newLeg)
' updated.Legs.Count = 2

Änderungshistorie

Version	Datum	Änderung
1.0	2026-04-16	Erstdokumentation