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

[mkinzler]

Delphi-Quellcode:

bl_zeige.Text := Ausgabe(strtodate(TDBEdit.Text));

[angos]

Grüße,

Delphi-Quellcode:

lbl_zeige.Text := Ausgabe(strToDate(TDBEdit.Text));

HOffe das hilft dir :)


[EDIT] UPs da war einer schneller [/EDIT]

[LingNeu]

@mkinzler, @angus
vielen Dank für Eure Hilfe.
Mein Gott - bin ich blöd - überseh doch wirklich das Einfachste :wall:

Gruss
LingNeu

[Union]

Um die Unsicherheit bei der Stringumwandlung zu umgehen könnte man auch schreiben:

Delphi-Quellcode:

lbl_zeige.Text := Ausgabe(TDbEdit1.Field.AsDateTime);

[DP-Maintenance]

Dieses Thema wurde von "SirThornberry" von "Programmieren allgemein" nach "Object-Pascal / Delphi-Language" verschoben.