Q&A

  • 입력 날짜에서 하루 뺸 날짜 구하는 방법을...?
ParamByName('APLEND_TM').Asstring := FormatDateTime('YYYYMMDD',StrToDate(dtp_aplend.text) - 1)

dtp_aplend 는 datetimespinedit입니다.

datetimespinedit에 9999.12.31로 되어 있을경우에 ParamByName 값에는
하루 뺀 날짜인 9999.12.30로 저정하고 싶은데요..

'APLEND_TM'  형은 char 형입니다.

다음과 같은 메세지가 나옵니다.

"99991231"is not a valid date 로 나오는데...

어떻게 수정해야 할지..



2  COMMENTS
  • Profile
    major 2002.02.21 22:12
    안녕하세여..
    그러시면 델파이 내장 함수를 사용하시면 어떨런지여..
    아마 델파이 폴더에(정확한 폴더는 모르겠네여)
    dateUtils.pas라는 파일이 있을 겁니다.
    그 파일을 Lib 폴더에 붙여 넣고 한번 어떤 함수가 있는 지 확인을 하시고
    나서 아마 IncDay라는 것이 있을 겁니다.
    그 함수를 사용하시면 될 것 같네여..
    형식은 아마도 이런식이 될것 같네여
    ParamByName('APLEND_TM').Asstring := FormatDateTime('YYYYMMDD', IncDay(dtp_aplend.text, -1));

    그럼 즐프하세여..


  • Profile
    이창영 2002.02.22 00:12

    var
      v_date: string;
    begin
      v_date := copy(dtp_aplend.text, 1, 4) + '-' + copy(dtp_aplend.text, 5, 2) + '-' + copy(dtp_aplend.text, 7, 2);
      Edit1.Text:=FormatDateTime('YYYYMMDD',StrToDate(v_date) - 1)
    end;