DateTimePicker verhält sich in Delphi XE ungewöhnlich

[Chemiker]

Hallo,

bei folgenden Code bekomme ich bei Delphi XE immer das aktuelle Datum zurück und nicht das Ausgewählte. Bei XE7 und Delphi 2006 ist das nicht so. Ist das ein Fehler in XE, oder muss irgendwo noch etwas zusätzlich eingestellt werden?

Delphi-Quellcode:

procedure TForm1.DateTimePicker1CloseUp(Sender: TObject);
var
  aStartDatum: TDateTime;
  sDatum: String;
begin
  aStartDatum:= DateTimePicker1.Date;
  ShowMessage('Datum: '+DateToStr(aStartDatum));
end;

Bis bald Chemiker

[himitsu]

Der Picker ist aber auch so eingestellt, daß man damit ein Datum auswählen kann?

Kind = dtkDate

[Chemiker]

Hallo himitsu,

ja, ist eingestellt, sonst könnte man ja nicht ein Datum auswählen. Es wird ja auch das aktuelle Datum zurückgegeben, aber nicht das was ausgesucht worden ist.

Bis bald Chemiker

[blawen]

Ich habe sowohl in XE, als auch in XE7 jeweils ein neues Projekt angelegt und damit Deinen Code ausprobiert.
In beiden Fällen habe ich kein Fehlverhalten feststellen können.

[Chemiker]

Hallo blawen,

Du hast recht, ich habe mal ein neues Projekt in XE angelegt, dann funktioniert der DateTimePicker wie gewohnt.
Es muss da irgendwie einen Seiteneffekt geben, keine Ahnung woran das wieder liegt.

Bis bald Chemiker