Änderungen an DateTimePicker wird eine ADO Exception

[michele_tedesco]

Danke fürs Feedback.

Ich habe folgendes festgestellt:
Das DBGrid beinhaltet 6 Felder, eins davon ist ein Datumfeld.
Das Abfüllen dieser Spalte passiert anhand zwei TDateTimePicker.
Eines für das Datum und eines (mit aktivierter Checkbox) für die Zeit.
beim OnExit Event beider DateTimePicker wird geprüft ob die Time-Checkbox aktiv ist und je nachdem nur das Datum oder Datum und Uhrzeit gespeichert (mit einem Ado.Edit --> Ado.Post).

Delphi-Quellcode:

procedure TForm3.DateTimePicker2Exit(Sender: TObject);
var
  Checked : Boolean;
  aDate : TDateTime;
  aTime : TDateTime;
begin
  Checked := DateTimePicker2.Checked;
  aDate := DateTimePicker1.Date;
  aTime := DateTimePicker2.Time;
  if ADOQuery1.Active then begin
    ADOQuery1.Edit;
  end;
  if Checked then
    ADOQuery1.FieldByName('TaskTermin').AsDateTime := StrToDateTime(DateToStr(aDate)+' '+TimeToStr(aTime))
  else
    ADOQuery1.FieldByName('TaskTermin').AsDateTime := aDate;
  ADOQuery1.Post;  
end;

Wenn ich das AdoQuery-Feld NICHT abfülle mit den DateTimePicker-Werte, dann erhalte ich die Fehlermeldung NIE!
Sobald ich aber der AdoQuery-Feld abfülle erhalte ich diese ( ) Fehlermeldung.

Gibt es bekannte Probleme in Kombination mit dem TDateTimePicker und ADO-Queries?

Danke nochmals.