TDate Today = Now();
TDate Yesterday = Today - 1;

unsigned short Year, Month, Day;

Yesterday.DecodeDate( &Year, &Month, &Day );



열시미 부지런히... 님이 쓰신 글 :
: 현재 날짜에서 어제 날짜를 구하려고 하는데...
: 아래와 같이 현재 날짜를 읽어서 - 1 을 한다음 어제 날짜를 구해서...
: 다시 년,월,일 을 문자열을 분리해서 읽어내고 있는데....
: 문자열을 분리안하고... 바로 어제 날짜의 년,월,일 바로 함수로 읽어 낼수 있는 방법은 없습니까...
: 고수님들 부탁드립니다.
:
: TDate Today = Today.CurrentDate();
: Panel1->Caption = Today;
:
: AnsiString date, b_year, b_month, b_day;
:
: TDate YesterDay = Today - 1;
: date = YesterDay;
: Panel2->Caption = YesterDay;
:
: b_year = date.SubString(0,4);
: PnlYear->Caption = b_year;
:
: b_month = date.SubString(6,2);
: PnlMonth->Caption = b_month;
:
: b_day = date.SubString(9,2);
: PnlDay->Caption = b_day;