怎么得到日期中的天数,月份,单独要 不要2003-7-1这种得,我只要得到7这样

解决方案 »

  1.   

    查帮助,Uses DateUtils单元,看相关函数
      

  2.   

    formatdatetime('m','2003-7-1');
    formatdatetime('d','2003-7-1');
      

  3.   

    label1.Caption:=formatdatetime('m',now);//月
    label1.Caption:=formatdatetime('d',now); //日
      

  4.   

    var
      m,d:String;
      year,month,day:word;
    begin
    DecodeDate(now,year,month,day):
    m:=format('%d',[month]);//月
    d:=format('%d',[day]);//日
    end;
    另一种方法,
     FormatDateTime('mm',now);//月
     FormatDateTime('dd',now);//日
      

  5.   

    function getDay(mydate:TDate)
    var
      year,month,day
    begin
      DecodeDate(mydate,year,month,day)
      getDay:=month;
    end;
      或者引用Rx的DateUitls单元
      getday:=ExtractMonth(mydate)
      

  6.   

    得到某月的天数:
    function DaysInAMonth(const AYear, AMonth: Word): Word;
    得到某年的天数:
    function DaysInAYear(const AYear: Word): Word
    得到月份:
    function MonthOf(const AValue: TDateTime): Word;具体应用看delphi help