Einzelnen Beitrag anzeigen

QuickAndDirty

Registriert seit: 13. Jan 2004
Ort: Hamm(Westf)
1.925 Beiträge
 
Delphi 12 Athens
 
#1

Wie kann ich Generics an overloaded Methode weitergeben

  Alt 28. Okt 2024, 11:34
Delphi-Version: 12 Athens
"Add" ist überladen und kann von diversen Typen sein...
Gibt es eine hoffnung das dieser code irgendwie funktioniert oder muss ich für jeden Typ ne Kopie von dem code machen?

Delphi-Quellcode:
Unit MUELL;
Interface
uses
  System.IOUtils, System.Classes, System.Variants,
  System.sysutils,
  System.Generics.Collections,uBasetableAccess, strutils,
  system.types,System.JSON, System.JSONConsts, System.JSON.Writers, System.JSON.Readers, REST.JSON;
type
  TJSONfn = class
  public
    class Function ArrToJSON<T>(const aArr:TArray<T>):String; //Generics können scheinbar nur in Methoden aber nicht in Prozeduren verwendet werden... also bitte schön Delphi, eine Klasse mit Methode
  end;

Implementation
class Function TJSONfn.ArrToJSON<T>(const aArr:TArray<T>):String;
Begin
  var JSArr := TJSONArray.Create;
  try
    For var element:T in aArr do
      JSArr.Add(element); // <===== an dieser Stelle kapituliert der compiler bedingungslos
    Result := JSArr.ToJSON
  finally
    JSArr.Free;
  end;
End;

end.
Andreas
Monads? Wtf are Monads?
  Mit Zitat antworten Zitat