델파이 TDateTimePicker 컨트롤의 첫 번째 부분으로 포커스 반환

Question

포커스가 TDateTimerPicker 컨트롤을 벗어난 후 나중에 컨트롤에 포커스가있는 부분 (일, 월 또는 연도)이 기억됩니다. 초점이 해당 부분으로 반환됩니다.

포커스를 컨트롤의 첫 번째 페이지로 강제로 되돌리려면 어떻게합니까?

Answer 1

컨트롤에 포커스가있는 부분을 잊게하려면 DateFormat을 변경 한 다음 다시 변경하십시오. 따라서 dfShort로 설정되면 dfLong으로 설정 한 다음 dfShort로 되돌립니다.

트릭은 포커스가 OnEnter 이벤트를 통해 반환 된 후 포커스를 반환하기 전에이를 수행하는 것이 아닙니다.

이렇게하는 가장 좋은 장소는 OnExit 이벤트입니다.

procedure TForm1.DateTimePicker1Exit(Sender: TObject); 
begin 

    DateTimePicker1.DateFormat := dfLong; 
    DateTimePicker1.DateFormat := dfShort; 

end;