Gibt es keine generischen Proceduren?

[H4ndy]

Wie macht es denn z.B. Format mit den typenlosen Dateneingabe-Array?

[Neutral General]

Zitat von H4ndy:

Wie macht es denn z.B. Format mit den typenlosen Dateneingabe-Array?

Array of Const

[s.h.a.r.k]

@himitsu: Kannst dich ja neulich an meine Klassenmethoden erinnern. So könntest es machen, nur musst halt auf die Benutzung achten Ich weiß, das ist zwar nicht so toll, aber ein alternativer Weg.

Dieses array of const Gedöns ist ja echt gut und recht, aber wenn man Generics einsetzen kann, dann sollte man diese bevorzugen, da dann nicht so viel gecastet werden muss. Ist somit dann auch schneller in der Ausführung.

[Blup]

Ich weis das Thema ist schon fast 15 Jahre alt.
Um so erstaunlicher das Delphi noch immer diese Einschränkung gilt.
Wenn sowas geht, gibt es wirklich keinen sinnvollen Grund globale generische Procedure und Funktionen zu verbieten:

Delphi-Quellcode:

type
  TIfThenHelper = class helper for TObject
    class function IfThen<T>(AValue: Boolean; const ATrue: T; const AFalse: T): T; static;
  end;

implementation

class function TIfThenHelper.IfThen<T>(AValue: Boolean; const ATrue: T; const AFalse: T): T;
begin
  if AValue then
    Result := ATrue
  else
    Result := AFalse;
end;

Leider ist immer nur ein Helper pro Klasse und Unit gültig, was die Nützlichkeit einschränkt.
Es ist aber möglich für eine abgeleitete Klasse einen weiteren Helper zu deklarieren.
Dann kann man beide Helper gleichzeitig in dieser Klasse nutzen.

[freimatz]

Zitat von Blup:

Wenn sowas geht, gibt es wirklich keinen sinnvollen Grund globale generische Procedure und Funktionen zu verbieten:

Zu verbieten nicht, aber auch keinen guten den Aufwand zu treiben.
Meiner Meinung nach sollte man generell globale generische Procedure und Funktionen vermeiden.

[Blup]

Wenn man oft genug überladene Funktionen wie IfThen() für alle möglichen Typen implementiert, sieht man das vieleicht anders.

[jaenicke]

Dafür ist es aber nicht nötig, lose umherschwirrende Funktionen zu implementieren. Man kann dafür auch Sammelklassen mit genetischen Klassenmethoden erstellen. Die kann man auch überall nutzen, aber man sieht, wo die herkommen. Dafür könnte man auch den Unitnamen vorstellen, aber das wäre dann optional, was für ein Team nicht optimal wäre.

So habe ich dann TStringTools, TMathTools, usw. in entsprechenden Units Lib.Tools.MathTools.pas usw. im Ordner lib\tools, so dass man sich intuitiv zurechtfindet.

[himitsu]

Es wurden mehrmals Lösungen vorgeschlagen, aber Emba hat abgelehnt.

z.B.
Ja, selbst wenn Generics nur mit Klassen/Records gehen, dann gibt es dennoch keinen Grund eine einzelne Methode nicht "intern" in eine Dummy-Klasse zu verpacken. (compilermagic und so)

ODER,
würde Emba sich nicht weigern wenigstens eine minimalste Unterstützung für Makros bereitzustellen, dann könnten wir das auch selbst machen.

[implementation]

Mit offenen Variant-Arrays (array of const)...
//edit: Zu spät, und kein roter Kasten...