Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.452 Beiträge
 
Delphi 12 Athens
 
#3

AW: Generische string.Split Funktion

  Alt 27. Sep 2018, 13:36
Wenn die internen Umwandlungsmechanismen immer funktionieren, könnte das auch so gehen:
Delphi-Quellcode:
  for Li := 0 to Length(LArr) - 1 do begin
    TArrayHelper.Add<T>(Result, TValue.From(Larr[Li]).AsType<T>);
  end;
Eventuell würde ich hier aber eine TList<T> vorziehen:
Delphi-Quellcode:
  list := TList<T>.Create;
  try
    for Li := 0 to Length(LArr) - 1 do begin
      list.Add(TValue.From(Larr[Li]).AsType<T>);
    end;
    Result := list.ToArray;
  finally
    list.Free;
  end;
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat