AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Wie kann ich Generics an overloaded Methode weitergeben
Thema durchsuchen
Ansicht
Themen-Optionen

Wie kann ich Generics an overloaded Methode weitergeben

Ein Thema von QuickAndDirty · begonnen am 28. Okt 2024 · letzter Beitrag vom 28. Okt 2024
Antwort Antwort
QuickAndDirty

Registriert seit: 13. Jan 2004
Ort: Hamm(Westf)
1.928 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
freimatz

Registriert seit: 20. Mai 2010
1.443 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: Wie kann ich Generics an overloaded Methode weitergeben

  Alt 28. Okt 2024, 12:43
Das wird so wohl nichts. Wie soll der Compiler denn wissen von welchen Typ T ist. Sechs Varianten sind erlaubt bei Add.
Da müsste es dann schon eine "function Add(const Element: <T>): TJSONArray" geben.
  Mit Zitat antworten Zitat
Benutzerbild von Olli73
Olli73

Registriert seit: 25. Apr 2008
Ort: Neunkirchen
741 Beiträge
 
#3

AW: Wie kann ich Generics an overloaded Methode weitergeben

  Alt 28. Okt 2024, 12:44
Wenn man den Typ "einschränkt", dann compiliert es:

class Function ArrToJSON<T: TJSONArray>(const aArr:TArray<T>):String; Leider kann man nur auf Klassen, Interfaces und Records einschränken, nicht auf String, Integer etc.


Aber du könntest sowas versuchen (ungetestet):

Delphi-Quellcode:
  if TypeInfo(T) = TypeInfo(string) then
    JSArr.Add(String(element))
  else if TypeInfo(T) = TypeInfo(Double) then
    JSArr.Add(Double(element))
  ...
  else
    Raise Exception.Create((PTypeInfo(TypeInfo(T))^.Name + ' not allowes');
  Mit Zitat antworten Zitat
QuickAndDirty

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

AW: Wie kann ich Generics an overloaded Methode weitergeben

  Alt 28. Okt 2024, 13:04
Das wird so wohl nichts. Wie soll der Compiler denn wissen von welchen Typ T ist. Sechs Varianten sind erlaubt bei Add.
Da müsste es dann schon eine "function Add(const Element: <T>): TJSONArray" geben.
in TS kann ich die Typvariable einschränken...
Ja ich weiß....

Wenn man den Typ "einschränkt", dann compiliert es:

class Function ArrToJSON<T: TJSONArray>(const aArr:TArray<T>):String; Leider kann man nur auf Klassen, Interfaces und Records einschränken, nicht auf String, Integer etc.


Aber du könntest sowas versuchen (ungetestet):

Delphi-Quellcode:
  if TypeInfo(T) = TypeInfo(string) then
    JSArr.Add(String(element))
  else if TypeInfo(T) = TypeInfo(Double) then
    JSArr.Add(Double(element))
  ...
  else
    Raise Exception.Create((PTypeInfo(TypeInfo(T))^.Name + ' not allowes');
Ja es wär schon cool wenn es eine notation dafür gäbe.

Ist ok
Ich hoffe einfach mal das ich nie etwas anderes als TArray<String> brauche. Und wenn mal was dazu kommt dann gibts halt overloaded versionen. Ich halte ja eh nichts von DRY.
Andreas
Monads? Wtf are Monads?
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:52 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz