Array sortieren

[Minz]

Hallo,

mit den Fehlermeldungen kann ich nicht sonderlich viel anfangen.

Da musst du mal schauen an welcher Stelle/Zeile Delphi hängen bleibt, also welche Operation gerade ausgeführt werden soll.

Desweiteren, wenn du sagst, dass eine Fehlermeldung kommt, wenn du ein zweites Element hinzufügst, stellt sich für mich die Frage, wie fügst du ein zweites Element hinzu. Desweiteren wie ist dein Array deklariert.

----
Lösung des Nicht-Sortierens:
Ich vermute einen kleinen Logikfehler in deiner Reihenfolge der Anweisungen.
Eigentlich müsstest bei jeder Incrementierung von y, Min zuweisen. Das bedeutet die Zeile
Min:=MyAdress[1]; musst du ändern in
Min:=MyAdress[y]; und diese eine Zeile nach unten verschieben, also in die 1. for-Schleife hinein.

----
Was ich sonst noch verändern würde:
Die Adressen in einem dynamischen Array ablegen. Du benötigst dann keine Extra-Funktion wie Anzahlfinden, weil du z.B. mit
for x:=low(Array) to high(Array) do begin durch das Array laufen kannst, ohne die Anzahl kennen zu müssen.

Dann würde ich noch probieren, MyAdress[x].Name in z.B. MyAdress[x].Nachname zu ändern. In einer früheren Delphi-Version hatte ich da einmal Probleme gehabt, weil einige Datentypen .Name besitzen und es nicht eindeutig war.

Gruß Minz