"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.