DateTimePicker aus Datenbank füllen

[Sayawa]

Hallo Zusammen,

ich fülle die Datenbank mit dem DateTimePicker mit dem folgenden Code:

Code: Alles auswählen

 
FrmConnectDB.SQLQuery1.ParamByName('datumangeschafft').AsString := Formatdatetime('yyyy.mm.dd', FrmEQStamm.DateTimePicker1.date);
 

Gspeichert ist er in der Datenbank im Format Jahr/Monat/Tag, im DateTimePicker ist es Tag/Monat/Jahr

Nun will ich das Datum bei einer Suchanfrage wieder in den DateTimePicker einlesen.

Versucht habe ich es mit:

Code: Alles auswählen

 
DateTimePicker1  := FrmConnectDB.SQLQuery1.ParamByName('datumangeschafft').AsString; 
 

Allerdings bekomme ich dann die Fehlermeldung Error: Incompatible types: got "AnsiString" expected "TDateTimePicker".
Was in der Abfrage ist falsch?

[h-elsner]

Der DateTime Picker will einen Wert als TDateTime. Du muss erst deinen String wieder in TDateTime umwandeln z.B. mit EncodeDate:
http://www.delphibasics.co.uk/RTL.asp?Name=EncodeDate

Gruß HE

[Socke]

Du musst schon die Eigenschaft Date angeben; ansonsten wird das nichts; Vielliecht kannst du das Datum auch direkt als DateTime aus der Datenbank abfragen.

Code: Alles auswählen

DateTimePicker1.Date  := FrmConnectDB.SQLQuery1.ParamByName('datumangeschafft').AsDateTime;

Falls du in der Datenbank das Datum als String speicherst, muss du diesen selbst in ein DateTime wandlen (siehe Antwort von h-elsner).

[Sayawa]

Vielen Dank für die schnellen Antworten

Das ganze hat geklappt mit:

Code: Alles auswählen

 
DateTimePicker1.Date  := FrmConnectDB.SQLQuery1.FieldbyName('anschaffungsdatum').AsDateTime;  
 

Es musste auch FieldbyName statt ParambyName sein.