Forum: Neuen Beitrag zur Code-Library hinzufügen
by p80286,
29. Dez 2016
procedure TListe.SortGroesse;
var
i, j : Integer;
Hilf : Real;
begin
for i := High(Feld) downto Low(Feld) do
for j := 0 to i-1 do
if Groesse > Groesse then begin
Hilf := Groesse;
Groesse := Groesse;
Forum: Neuen Beitrag zur Code-Library hinzufügen
by p80286,
28. Dez 2016
private
Feld : array of TPerson;
Groesse : array of real;
Hilfe : array of TPerson;
Falls Du mit dem Inhalt von Groesse Feld oder Hilfe sortieren willst, vergiss es!
TPerson sollte die Eigenschaft enthalten, die Du zum sortieren benutzen willst.
Wie sieht denn TPerson aus?
Forum: Neuen Beitrag zur Code-Library hinzufügen
by p80286,
26. Dez 2016
Der TE versucht wohl gerade an Hand eines Lehrbuches, das Sortieren zu lernen. Auch wenn eine (generische) Liste, die bessere Wahl wäre, beziehen seine Beispiele sich wohl auf ein Array. Darum kann er zunächst einmal nichts für die etwas krude Fragestellung.
@Marcel1990
Was hast du denn bisher?
Gruß
K-H