Sortieren eines Array of record

[himitsu]

+1?
und Low+1 aka 0+1 aka immer 1?
[edit] AAAAAAHH, I nicht 1 ... schwer zu erkennen. PS: Darum verwende ich immer nur das keine i, auch wenn ich alle anderen einbuchstabigen Variablen ebenfalls groß schreibe.

Delphi-Quellcode:

for var I := 0 to High(Result) do
  Result[I] := Value[I];

param: array of ... sollte immer mit 0 beginnen, egal was reingegeben wurde.



warum nicht?

Delphi-Quellcode:

FUNCTION TCodeSorted(Value: TArray<TCode>): TArray<TCode>;
begin
  Result := Value;

oder direkt

Delphi-Quellcode:

procedure TCodeSorted(var Value: TArray<TCode>);
begin

[edit] Ahhh OK, die statischen Arrays.
Wobei man es inzwischen auch direkt dynamische Konstanten und Variablen deklarieren kann.

Delphi-Quellcode:

const  // oder var
  GCodeB: array of TCode = [
    ...
  ];

Wenn "Wort" nicht eindeutig ist und somit auch noch nach Bezeichnung sortiert werden müsste.

Delphi-Quellcode:

    begin
      Result := string.Compare(Left.Wort, Right.Wort, [coDigitAsNumbers]);
      if Result = 0 then
        Result := string.Compare(Left.Bezeichnung, Right.Bezeichnung, [coDigitAsNumbers]);
    end));