D6: DateTimePicker OnKeyDown Datum nicht aktualisiert

[hoika]

Hallo,

deine Lösung klappt leider auch nicht.

(Das ProcessMessages und Sleep war auch ein Test)

Delphi-Quellcode:

procedure TForm1.OnOK;
begin
  Self.SetFocus;
  Application.ProcessMessages;
  Sleep(200);

  DateTimePicker1.SetFocus;
  DateTimePicker1.Refresh;

  ShowMessage(DateToStr(Int(DateTimePicker1.Date)));
end;

Die einzige, unbefriedigende Lösung ist,
das KeyPreview rauszunehmen und nur den OK-Knopf zu erlauben ;(



Heik