万年历Delphi控件 实例.rar

上传者: 39840914 | 上传时间: 2021-09-17 16:46:11 | 文件大小: 443KB | 文件类型: RAR
一款Delphi编写的万年历控件,用于开发功能强大的日历功能,支持显示农历,可自定义日历显示区的背景图像,文字颜色、是否显示生肖、背景颜色以及标题字体及颜色自定义、节日字体定义等,可充分实现对日历个性定制的需求。具体日历效果请参见演示截图所示。
   //农历月份数据,每年4字节,从1901年开始,共150年
   //数据来源:UCDOS 6.0 UCT.COM
   //分析整理:Copyright (c) 1996-1998, Randolph
   //数据解析:
   //如果第一字节的bit7为1,则该年1月1日位于农历12月,否则位于11月
   //第一字节去除bit7为该年1月1日的农历日期
   // 第二字节 第三字节
   //bit: 7 6 5 4 3 2 1 0 7 6 5 4 3 2 1 0
   //农历月份:16 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1
   //农历月份指的是从该年1月1日的农历月份算起的顺序号
   //农历月份对应的bit为1则该月为30日,否则为29日
   //第四字节为闰月月份
  // BaseDate='2000/02/04';//2000立春
   BaseAnimalDate = '1972'; //1972年支为子(是鼠年)
   BaseSkyStemDate = '1974'; //1974年干为甲
  注:原始数据类型定义在GdipTypes.pas中,为了Delphi习惯,常用的已经在本模块重新
  * 定义。要使用某些特殊的枚举、记录、常量或过程必须包含GdipTypes.pas文件

文件下载

资源详情

[{"title":"( 22 个子文件 443KB ) 万年历Delphi控件 实例.rar","children":[{"title":"codesc.net","children":[{"title":"MyControl","children":[{"title":"GdipUtil.pas <span style='color:#111;'> 21.26KB </span>","children":null,"spread":false},{"title":"DateCn.pas <span style='color:#111;'> 44.68KB </span>","children":null,"spread":false},{"title":"Calendar.cfg <span style='color:#111;'> 438B </span>","children":null,"spread":false},{"title":"Calendar.dpk <span style='color:#111;'> 788B </span>","children":null,"spread":false},{"title":"GdipExport.pas <span style='color:#111;'> 142.47KB </span>","children":null,"spread":false},{"title":"Calendar.res <span style='color:#111;'> 1.50KB </span>","children":null,"spread":false},{"title":"Demo","children":[{"title":"2.jpg <span style='color:#111;'> 174.51KB </span>","children":null,"spread":false},{"title":"Project1.res <span style='color:#111;'> 876B </span>","children":null,"spread":false},{"title":"Unit1.dfm <span style='color:#111;'> 141.30KB </span>","children":null,"spread":false},{"title":"1b04762q117eaf.6b670e.jpg <span style='color:#111;'> 60.46KB </span>","children":null,"spread":false},{"title":"Project1.cfg <span style='color:#111;'> 434B </span>","children":null,"spread":false},{"title":"Unit1.pas <span style='color:#111;'> 4.35KB </span>","children":null,"spread":false},{"title":"Project1.dpr <span style='color:#111;'> 188B </span>","children":null,"spread":false},{"title":"Project1.dof <span style='color:#111;'> 1.97KB </span>","children":null,"spread":false},{"title":"Unit1.dcu <span style='color:#111;'> 8.52KB </span>","children":null,"spread":false}],"spread":true},{"title":"MyCalendar.pas <span style='color:#111;'> 30.47KB </span>","children":null,"spread":false},{"title":"Calendar.dof <span style='color:#111;'> 1.97KB </span>","children":null,"spread":false},{"title":"ChnCalendarUse.pas <span style='color:#111;'> 31.19KB </span>","children":null,"spread":false},{"title":"GdipTypes.pas <span style='color:#111;'> 107.30KB </span>","children":null,"spread":false},{"title":"CnPack.inc <span style='color:#111;'> 19.56KB </span>","children":null,"spread":false},{"title":"CnCalendar.pas <span style='color:#111;'> 88.02KB </span>","children":null,"spread":false},{"title":"Gdiplus.pas <span style='color:#111;'> 292.12KB </span>","children":null,"spread":false}],"spread":false}],"spread":true}],"spread":true}]

评论信息

  • ANLISAISHIHAOREN :
    Compile时报错,myclndr1没有定义,程序运行失败,无法看到界面,请作者查看
    2020-01-16

免责申明

【只为小站】的资源来自网友分享,仅供学习研究,请务必在下载后24小时内给予删除,不得用于其他任何用途,否则后果自负。基于互联网的特殊性,【只为小站】 无法对用户传输的作品、信息、内容的权属或合法性、合规性、真实性、科学性、完整权、有效性等进行实质审查;无论 【只为小站】 经营者是否已进行审查,用户均应自行承担因其传输的作品、信息、内容而可能或已经产生的侵权或权属纠纷等法律责任。
本站所有资源不代表本站的观点或立场,基于网友分享,根据中国法律《信息网络传播权保护条例》第二十二条之规定,若资源存在侵权或相关问题请联系本站客服人员,zhiweidada#qq.com,请把#换成@,本站将给予最大的支持与配合,做到及时反馈和处理。关于更多版权及免责申明参见 版权及免责申明