+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));