2016-06-19 2 views
-5

devexpress의 새로운 dxDateTimeWheelPicker가 다소 귀엽다고 생각하여 어떻게 작동하는지 보려고했습니다. 월 휠을 돌렸을 때 레이블에 달이 표시되는지 확인하려고했지만 호환되지 않는 유형 오류 (DateTime 및 문자열)가 표시됩니다.이 datetostr 변환에서 나는 무엇을 놓치고 있습니까?

procedure TForm3.dxDateTimeWheelPicker2PropertiesChange(Sender: TObject); 
var 
myDate : TDateTime; 
begin 
myDate := datetimetostr(dxDateTimeWheelPicker2.DateTime); 
label1.Caption := formatdatetime('mm', myDate); 
end; 

무엇이 여기에 있습니까? 나는이 일을하기 위해 무엇을해야합니까? 그래서

myDate := datetimetostr(dxDateTimeWheelPicker2.DateTime); 

: 그런 다음이 변수에 TDateTime 문자열 A를 변환하는 함수의 결과를 할당하려고

var 
    myDate : TDateTime; 

:

+5

'datetimetostr()'무엇을 반환 당신이 기대하는 당신이 필요로하는 모든이 무엇입니까? –

답변

2

당신은 TDateTime 변수를 선언하는 물론 TDateTimeString과 호환되지 않기 때문에 호환되지 않는 유형 오류가 발생합니다. 그러나이 연습에서는 TDateTime 값만 있으면되므로 중간 문자열 변환이 완전히 필요하지 않습니다. 당신이 원한다면 당신도 myDate 변수 자체를하지 않고 할 수있는이 경우

myDate := dxDateTimeWheelPicker2.DateTime; 
label1.Caption := formatdatetime('mm', myDate); 

:

label1.Caption := formatdatetime('mm', dxDateTimeWheelPicker2.DateTime); 
관련 문제