Ich habe gerade ein lustiges Problem bzgl. dem Überladen von Methoden und einem Parameter mit einem Funktionszeiger (reference to function...). Hier kann man die Definition und das Problem sehen.
Delphi-Quellcode:
TApArray<T> = record
private
TToStringFunc = reference to function (Value: T): String;
public
function ToString(const ToStrFunc: TToStringFunc; const Separator: String; const Prefix, Suffix: String): String; overload;
function ToString(const ToStrFunc: TToStringFunc; const Separator: String; const UseAffix: Boolean): String; overload;
function ToString(const ToStrFunc: TToStringFunc; const Prefix, Suffix: String): String; overload;
function ToString(const ToStrFunc: TToStringFunc; const UseAffix: Boolean): String; overload;
function ToString(const ToStrFunc: TToStringFunc; const Separator: String): String; overload;
function ToString(const ToStrFunc: TToStringFunc): String; overload;
function ToString(const Separator: String; const Prefix, Suffix: String): String; overload;
function ToString(const Separator: String; const UseAffix: Boolean): String; overload;
function ToString(const Prefix, Suffix: String): String; overload;
function ToString(const UseAffix: Boolean): String; overload;
function ToString(const Separator: String): String; overload;
function ToString(): String; overload;
end;
var
A : TApArray<Integer>;
F : TApArray<Integer>.TToStringFunc;
begin
F := function (Value: Integer): String
begin
Result := IntToStr(Value);
end;
A.ToString(); // klappt
A.ToString(F); // klappt
A.ToString(IntToStr); // -> [DCC Fehler] Testing.pas(1004): E2035 Nicht genügend wirkliche Parameter
A.ToString(IntToStr, '|', False); // klappt
A.ToString(IntToStr, ';', '(', ')'); // klappt
Ich verstehe hier nicht ganz, warum Delphi beim dritten Aufruf ein Problem hat, denn eigentlich gibt es ja eine entsprechende Methode, die einen einzigen Parameter vom Typ TToStringFunc übernimmt. Warum sollten hier noch weitere Parameter fehlen? Warum funktioniert denn der Aufruf mit dem Parameter F?
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)