Overload mit gleichen Parametern

[fLaSh11]

Hallo Dpler,

//Suche erfolglos benutzt

ich hab früher schon überladene Funktionen benutzt, da haben diese sich aber durch die Parameter unterschieden. Jetzt tun sie das nicht, sondern durch den Rückgabetypen. Bei dsdt.info lese ich das:

Zitat von dsdt.info:

Überladene Methoden müssen sich deshalb entweder in der Anzahl der Parameter oder in den Typen dieser Parameter signifikant unterscheiden.

Also ist folglich so etwas nicht möglich?

Delphi-Quellcode:

function assign(index: byte): TTechLevel; overload;
function assign(index: byte): TSize; overload;

Delphi meckert halt, dass die Funktion "assign" nochmals deklariert wird.

MfG
Steffen

[FAlter]

Hi,

Es ist nicht möglich.

Warum fragst du üpberhaupt, wenn du es schon selbst herausgefunden hast?

Sowas würde aber gehen:

Delphi-Quellcode:

procedure assign(index: byte; out Result: TTechLevel); overload;
procedure assign(index: byte; out Result: TSize); overload;

Mfg
FAlter

[OregonGhost]

Ich stecke zwar nicht ganz so tief in den Delphi-Innereien, aber ich schätze, das Problem ist hier, dass der Compiler nicht auflösen kann, welche Version einer Funktion benötigt wird. In C++ ist eine nicht ganz unübliche Lösung für dieses Problem, Template-Parameter einzusetzen, aber ansonsten könntest du auch einfach einen anderen Namen für die Funktion vorsehen oder die im roten Kasten von FAlter vorgeschlagene Methode der Ausgabeparameter verwenden. So aus (Bibliotheks-)Konsumentensicht würde ich sagen, dass das beides eine sehr viel intuitivere Anwendung der Funktion(en) ermöglicht als überladene Rückgabewerte.

Einer der Gründe für dieses Problem (und auch dafür, dass z.B. C++-String-Klassen meistens keinen impliziten Cast von und nach PChar mitbringen) ist der, dass viele Typen auf verschiedene Weisen ineinander überführbar sind und der Compiler Mehrdeutigkeiten auflösen muss. Und Compiler können dabei furchtbar kreativ werden, was eine unangenehme Fehlerquelle darstellt und daher an einigen Stellen (wie den Rückgabewerten) von vornherein durch das Sprachdesign vermieden wird.

[fLaSh11]

Danke, ich war grad so vertieft, dass ich nciht an den var-/out-Parameter gedacht hab

[RavenIV]

Zitat von fLaSh11:

Also ist folglich so etwas nicht möglich?

Delphi-Quellcode:

function assign(index: byte): TTechLevel; overload;
function assign(index: byte): TSize; overload;

Nur so am Rande erwähnt:
Ich würde von einer Funktion assign erwarten, dass sie mir irgendetwas hinzufügt oder zusammenfügt.
Da würde sich ein Returnwert von True/False anbieten (erfolgreich oder nicht).

Warum soll assign ein TTechLevel oder ein TSize zurückgeben?
Erstelle besser zwei getrennte Funktionen GetTechLevel und GetSize dafür.