2008 年 3月 25 日随笔档案 - 大口仔

2008年3月25日

摘要： procedure GetMonthDay(const ADate: TDateTime; var AMonthFirst, AMonthLast: TDateTime); var Year, Month, Day: Word; begin DecodeDate(ADate, Year... 阅读全文

posted @ 2008-03-25 15:51 大口仔阅读(3030) 评论(2) 推荐(0)