取出日期中的年份,月份,天
messagebox(form1.handle,DateToStr(Date()),..)
会有错,请教!

解决方案 »

  1.   

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

  2.   

    to  zengting(喜欢隐身的爱情魔法师) :我试了,这个不行
    to jy_1201(俊友) :你的可以,但是如果我想用MessageBox来实现呢?
    稍后揭贴!
      

  3.   

    同意:qiujsh(qiujsh) ,看帮助
      

  4.   

    messagebox(form1.handle,PChar(DateToStr(Date())),PChar(..),..)
      

  5.   

    messagebox(form1.handle,PChar(DateToStr(Date())),PChar(..),..)
    要把string类型转化为PCHAR,
    因为messagebox要求参数是PCHAR类型!
      

  6.   

    呵呵,在问一个:Pchar 和String怎么互换呢?
      

  7.   

    PChar 是自动转换到string类型的。
    Delphi自动转换的。