현재 날짜에서 어제 날짜를 구하려고 하는데...
아래와 같이 현재 날짜를 읽어서 - 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;