오전 10:00:00라는 시작시간이 있습니다.
여기에 간격을 50이라고 주면 끝시간이 오전 10:50:00 이라고 나오게 하려면 어떻게 하죠?
시작시간은 Time형식이고 Duration은 integer형식인데 끝시간도 시작시간과 똑같은 형식으로 나와야 합니다.
예) MaskEdit1.text := 시작시간; // Time형식
Edit1.text := 간격; //integer 형식
끝시간 := ( 이부분어떻게 하죠? )
//끝시간도 Time형식으로(00:00:00 AM/PM)
도와주십쇼!!
Delphi의 시간은 실수로 되어 있고 여기서 정수부분이 하루,
나머지 소수 부분이 시간입니다.
그러므로 1시간을 더하려면 dateval + (1/24)를 하면 됩니다.
1분을 더하려면 dateval + ((1/24) / 60)하면 되겠지요.
50분을 더하려면 dateval + ((1/24) / 60) * 50 을 하면 됩니다.
궁금돌이 wrote:
> 오전 10:00:00라는 시작시간이 있습니다.
> 여기에 간격을 50이라고 주면 끝시간이 오전 10:50:00 이라고 나오게 하려면 어떻게 하죠?
>
> 시작시간은 Time형식이고 Duration은 integer형식인데 끝시간도 시작시간과 똑같은 형식으로 나와야 합니다.
>
>
> 예) MaskEdit1.text := 시작시간; // Time형식
> Edit1.text := 간격; //integer 형식
>
> 끝시간 := ( 이부분어떻게 하죠? )
> //끝시간도 Time형식으로(00:00:00 AM/PM)
> 도와주십쇼!!