Q&A

  • 코딩문제인듯 한데...
원하는 결과값은 wMEdt가 00이나 02이면 wMEdt_DATE에서 -1을 하고 아니면
그냥 wMEdt_DATE값을 ls_s_date에다 넣고 싶습니다.
그리고 그 ls_s_date값을 다시 Qry의 date에 넣으려고 하는데...
아래와 같이 코딩 하니 에러가 나네여.
짐작으로는 데이터형식 문제인거 같기도 하고... 이것 저것 손대봐도.
잘 안되어서 글올립니다.
너무 초짜질문이라고 무시하지 마시고 답글 주심 정말 소중하게 쓰겠습니다 ㅜ.ㅜ

ls_s_date : integer

if (Copy(wMEdt.Text, 1, 2) = '00') or
   (Copy(wMEdt.Text, 1, 2) = '02') then
   ls_s_date := strtoint(wMEdt_DATE.asinteger -1);
else
   ls_s_date := wMEdt_DATE.text;
end;


Qry.FieldByName('DATE').asString  := ls_s_date.Text;

언제나 좋은 하루 되세요 ^^
1  COMMENTS
  • Profile
    모영철 2004.07.14 02:33
    ls_s_date := strtoint(wMEdt_DATE.asinteger -1);

    이부분이 문제인거 같네요..

    wMEdt_DATE 컴포넌트가 EditBox인거 같은데요.

    asinteger 란 프로퍼티나 펑션은 없습니다.

    ls_s_date := IntToStr(strtoint(wMEdt_DATE.text) -1)

    이렇게 해야 맞는거 같습니다.