Einzelnen Beitrag anzeigen

Benutzerbild von s.h.a.r.k
s.h.a.r.k

Registriert seit: 26. Mai 2004
3.159 Beiträge
 
#1

Überladen von Methoden kollidiert mit Funktionszeiger-Parameter (Anonyme Methode)

  Alt 16. Mai 2011, 15:27
Delphi-Version: XE
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)

Geändert von s.h.a.r.k (16. Mai 2011 um 17:25 Uhr)
  Mit Zitat antworten Zitat