怎样取得当前的月份？比如11月就取“11月”。

怎样取得当前的月份？比如11月就取“11月”。

解决方案 »

  1.   

    看看Delphi手册。有这样的函数。
      

  2.   

    然后定义一个枚举，再通过Case得到。
      

  3.   

    procedure DecodeDate(Date: TDateTime; var Year, Month, Day: Word);
      

  4.   

    monthofdays() 
    or 
    formatdatetime('mm',date)
      

  5.   

    edit1.text :=formatdatetime('mm'+'月',date);
     edit2.text :=formatdatetime('yyyy'+'年'+'mm'+'月'+'dd'+'日',date);
      

  6.   

    对楼上的补充：一般MIS里面取时间都要取服务器的时间，所以通常用SQL实现。
    例如：MS　SQLServer里面用：select month(getdate())
      

  7.   

    DecodeDate(Date: TDateTime; var Year, Month, Day: Word);
      

  8.   

    DecodeDate(Date: TDateTime; var Year, Month, Day: Word);