Wie mache ich aus TDateTime ein TDate ?

[LingNeu]

Hallo Delphifreunde,
ich habe ein Datenbankfeld mit dem Typ TDateTime und da möchte ich in eine Funktion nur das Datum übergeben. Die Funktion braucht TDate. Immer wenn ich den Datenbankfeldinhalt der Funktion übergebe bekomme ich folgende Fehlermeldung.

Inkompatible Typen 'TDate' und 'TDBEdit'

Ich hab schon alles versucht. Hier einige Versuche ...
//1
lbl_zeige.Text := Ausgabe(strtodate(TDBEdit)); // function Ausgabe(ADate: TDate): string;
//2
lbl_zeige.Text := Ausgabe(TDBEdit);
//3
lbl_zeige.Text := Ausgabe(datetostr(TDBEdit));

In dem TDBEditfeld der Datenbank ist ein Datumswert drin, in der Form '01.01.2000';
Irgendwie bin ich zu blond, da ich noch ein Newbie bin.
Wäre für jeden Hinweis dankbar.
LingNeu