TDate und Real vertragen sich nicht bei Funktionsaufruf

**Mike_on_Tour**

Hallo,

ich folgendes Problem mit diesen Funktionen:

UNIT_A.pas:

Delphi-Quellcode:

			function GetValue (ParamIdent : String; ParamDefault : Real) : Real; overload;

function GetValue (ParamIdent : String; ParamDefault : TDate) : TDate; overload;

function GetValue (ParamIdent : String; ParamDefault : Real) : Real;

begin

  Result := ReadFloat (...);

end;

function GetValue (ParamIdent : String; ParamDefault : TDate) : TDate;

begin

  Result := ReadDate (...);

end;

UNIT_B.pas:

markieren

Delphi-Quellcode:

			uses

  Unit_A;

var

  rValue : Real;

  dtValue : TDate;

begin

  rValue := GetValue ('Betrag', 0.00);

  dtValue  := GetValue ('Datum', Date);

end;

Der Compiler schmeißt bei der zweiten Zeile (dtValue) eine Fehlermeldung "E2251 Doppeldeutiger überladener Aufruf von 'GetValue'". Delphi will hier auch die Funktion mit Real-Werten nehmen und das paßt halt nicht zum Datumstyp.

Am Ende eines langen Tages fällt mir aber dazu auch nichts anderes sein. Aber vielleicht kann mir ja jemand weiter helfen ?

Mike

TDate und Real vertragen sich nicht bei Funktionsaufruf

TDate und Real vertragen sich nicht bei Funktionsaufruf

Forumregeln