Structure-Array nach bestimmter eigenschaft sortieren

  • VB.NET

Es gibt 5 Antworten in diesem Thema. Der letzte Beitrag () ist von ErfinderDesRades.

    Structure-Array nach bestimmter eigenschaft sortieren

    Halllo Leute,

    wie kann ich die Array.Sort-Methode auf ein Structure-Array anwenden?
    Mein bisheriger Code:

    VB.NET-Quellcode

    1. Public Structure ColorProbabilityStrucure
    2. Implements IComparable(Of ColorProbabilityStrucure)
    4. Public Property Color As Drawing.Color
    5. Public Property Probability As Double
    7. Public Function CompareTo(ByVal other As ColorProbabilityStrucure) As Integer Implements System.IComparable(Of _
    8. ColorProbabilityStrucure).CompareTo
    10. Dim oY As ColorProbabilityStrucure = CType(other, ColorProbabilityStrucure)
    12. If Me.Probability > oY.Probability Then Return 1
    13. If Me.Probability < oY.Probability Then Return -1
    14. If Me.Probability = oY.Probability Then
    15. If Me.Color.ToArgb > oY.Color.ToArgb Then Return 1
    16. If Me.Color.ToArgb < oY.Color.ToArgb Then Return -1
    17. If Me.Color.ToArgb = oY.Color.ToArgb Then Return 0
    18. End If
    19. End Function
    20. End Structure
    Und in dem Sub Main möchte ich folgendes anwenden:

    VB.NET-Quellcode

    1. Dim _arr(20) As ColorProbabilityStrucure
    3. Array.Sort('<Code, um das Array nach der Property "Probability" zu sortieren>)
    Wie soll ich das anwenden?

    Vielen Dank,
    wincrash
    (\_/) Das ist Hase.
    (O.o) Kopiere Hase in deine Signatur
    (> <) und hilf ihm so auf seinem Weg zur Weltherrschaft.

    Hi
    möchtest du jetzt die bestehende IComparable-Implementierung verwenden oder manuell nach der Probability-Eigenschaft sortieren (btw. hast du Strucure geschrieben)?
    Wenn du nach IComparable sortieren willst, einfach Array.Sort(_arr), sonst Array.Sort(_arr, Function(l, r) l.Probability.CompareTo(r.Probability)).

    Gruß
    ~blaze~

    @Wincrash:: Oder so:
    IComparer

    VB.NET-Quellcode

    1. Public Class Form1
    2. Private xx As New List(Of MyColor)
    4. Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    5. xx.Sort(New MyColorComparer)
    6. End Sub
    7. End Class
    9. Public Class MyColor
    10. Public Property Color As Drawing.Color
    11. Public Property Probability As Double
    12. End Class
    14. Public Class MyColorComparer
    15. Implements IComparer(Of MyColor)
    17. Public Function Compare(x As MyColor, y As MyColor) As Integer Implements System.Collections.Generic.IComparer(Of MyColor).Compare
    18. If x.Probability > y.Probability Then Return 1
    19. If x.Probability < y.Probability Then Return -1
    20. If x.Probability = y.Probability Then
    21. If x.Color.ToArgb > y.Color.ToArgb Then Return 1
    22. If x.Color.ToArgb < y.Color.ToArgb Then Return -1
    23. If x.Color.ToArgb = y.Color.ToArgb Then Return 0
    24. End If
    25. Return 0
    26. End Function
    27. End Class
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    Ich habe letzten Endes die Lösung von RodFromGermany verwendet.
    Vielen Dank an alle,
    wincrash

    @~blaze~: Danke, dass du den Schreibfehler gefunden hast :thumbup:
    (\_/) Das ist Hase.
    (O.o) Kopiere Hase in deine Signatur
    (> <) und hilf ihm so auf seinem Weg zur Weltherrschaft.

Facebook
Telefonspende