Delphi-Quellcode:
type
TDateTime = type Double;
TDate = type TDateTime;
Real = Double;
ich vermute mal da liegt das Problem ... beides ist im Grunde ein Double
falls es nicht stört kannst du ja TDate und Co. auch als Double speichern, also nur noch eine Funktion.
Ansonsten bleibt dir hier nur noch die Möglichkeit die eine Funktion umzubenennen,
oder statt Real das kleinere Single oder das größere Extended zu nutzen