⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 readme.txt

📁 是一个免费并开源的支持农历的月历控件
💻 TXT
字号:
控件安装:
在File菜单下,选择OPEN...打开这个LssCalendar_D7.dpk文件,在出现的Package窗口中先Compile一下,然后单击Install。你可以在LssCalendar Tab下找到控件。
最后在Tools->Environment Options->Library Tab,Library path里增加LssCalendar.pas所在目录,就OK了。



编译说明:如果你没有AAFont,请把第80行{$DEFINE AAFONT}删除;
          如果你使用的Delphi版本低于7.0,请去掉第81行{$DEFINE DELPHI5}前的注释;



                   TLssCalendar (支持农历的月历控件)
                                        Version  2.00
     2006-03-01 Ver 2.00  Luke.Wang
  主要修改;
  1。TLssCalendar 2.0向下兼容;
  2。参照控件CnCalendar,增加了月份背景显示;
  3。参照控件hxCalendar,增加了公历和农历节日显示;
  4。参照控件LunarCalendar,增加Grid和Border显示,显示提示信息窗口;
  5。将控件中的字体设置改为TLssColors属性,方便用户修改;
  6。Title栏增加了上一年、上一月、下一月、下一年快捷按钮;
  7。增加了BackImage属性,用户可以为每个月设置不同图片作为每月背景;
  8。增加了TFestivalList类,用户可以订制和标记自己的节日;
  9。可以显示英文星期名称、标题;
  10。支持ISO8601日期格式(以星期一为一周开始);
  11。用户可以自定义公历日期与农历或节日的显示比例;
  11。根据nihaoqiang的修改,编写了DateUtils中一些function,以方便Delphi 5.0用户;
    (本控件只在Delphi7中测试过,请使用Delphi其它版本的用户帮忙测试一下)
                 

                 
      开发平台:WinXP SP2 + Delphi 7.0

      请不要删除本说明。

                                                             Luke Wang

                                                             2004.01
--------------------------------------------------------------------------------
                   TLssCalendar (支持农历的月历控件)
                                        Version  1.10

      发布这个控件是因为我在网上找不到支持农历的月历控件,就自己写了个,希望能
  有用。

      您可以没有任何限制的使用、修改、分发本控件。但没有任何担保,甚至没有适合特
  定目的而隐含的担保。如果您修改了本控件,烦请发一份拷贝到<LuckMiky@21cn.com> 。

      开发平台:PWin2000Pro + Delphi 7.0

      请不要删除本说明。

  主要功能;
  1、在日历面板上同时显示公历和农历,农历部分仅支持公元1900.1.31到公元2100.12.31;
  2、可以定制控件界面颜色和字体,类似TmonthCalendar,可以选择采用AAFont平滑字体
     边缘(有点慢);
  3、控件字体大小根据控件大小自动适应;
  4、支持鼠标和键盘或者代码选择日期;
     Home:每月的第一天      End:每月的最后一天
     PageUp: 上一个月       Page:下一个月
     四个方向键移动光标
  5、提供了公历转农历和农历转公历函数,支持干支年、月、日;函数原形及调用方法请
     看代码。
      本单元农历转换部分为 Mostone.Jiang 漠石(mostone@hotmail.com)的CnBase.pas,
  作了一点小小改动。由于控件字体过小,采用了 ***与月共舞工作室 周劲羽*** 的
  AAFont 来平滑字体显示,在此感谢2位,提供了这么好的东西给我们免费使用!


                                                              Miky

                                                             2004.01

     更新历史:
     2004-4-24  Ver 1.10  
                修正了网友happylife发现的Bug;
                修改了Paint部分,不再使用DoubleBuffered,显示速度有很大改观;
                添加了干支记日显示方式选项;
                添加了keypress,keydown,keyup事件;
                添加了编译指令{DEFINE AAFONT},如果你没有AAFont,请把第49行删除

     2004-1-15  Ver 1.00
                发布于Delphi盒子;

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -