> 이전의 달을 구하는데 날짜는 항상 마지막 날로..

현재의 날짜와는 관계없이 전달 말일의 날짜를 말씀하시는건가요?

DecodeDate(MDate,CurYear,CurMonth,CurDay);

strMonth := DateToStr(Encodedate(CurYear,StrToInt(MonthCBox.Text),1)-1);



그리고

> Day := Day - Day;

값이 안나올것 같은데요? Day의 값이 무엇이었건간에 초기화가 되어 버리는 군요.



바라미~



박 준 wrote:

> 이전의 달을 구하는데 날짜는 항상 마지막 날로..

> 참고로 이전의 달을 구하는데 있어서 값을 변수로 받아서 오기 때문에 1 ~ 12월까지 있습니다.

> 델파이 2,0을 어쩔 수 없이 사용하기 때문에.. 그러고 반드시 2.0을 사용해야되기 때문에 제약이 많더군요..

>

> 먼저 decmonth는 먹히지 않고요..

>

> DecodeDate(Mdate, Year, Month, Day);

> Month := Month - StrToInt(MonthCBox.Text);

> Day := Day - Day;

> result := EncodeDate(Year, Month, Day);

> strMonth := DateToStr(result);

> ShowMessage(strMonth);

>

> 이렇게 했는데 Day - Day를 하면 encode error가 뜨더라구요.

> ㅡ.ㅡ

> 어떻게 방법이 없습니까?

>