亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 編程 > Delphi > 正文

用Delphi處理公歷到農(nóng)歷的轉(zhuǎn)換

2019-11-18 18:46:50
字體:
供稿:網(wǎng)友
const
  START_YEAR=1901;
  END_YEAR=2050;

//返回iYear年iMonth月的天數(shù) 1年1月 --- 65535年12月
function MonthDays(iYear,iMonth:Word):Word;

//返回陰歷iLunarYer年陰歷iLunarMonth月的天數(shù),如果iLunarMonth為閏月,
//高字為第二個(gè)iLunarMonth月的天數(shù),否則高字為0  1901年1月---2050年12月
function LunarMonthDays(iLunarYear,iLunarMonth:Word):Longword;

//返回陰歷iLunarYear年的總天數(shù) 1901年1月---2050年12月
function LunarYearDays(iLunarYear:Word):Word;

//返回陰歷iLunarYear年的閏月月份,如沒有返回0  1901年1月---2050年12月
function GetLeapMonth(iLunarYear:Word):Word;

//把iYear年格式化成天干記年法表示的字符串
  else
    l_CalcLunarDate(iYear,iMonth,iDay,CalcDateDiff(InDate,EncodeDate(START_YEAR,1,1)));
    Result := trim(FormatMonth(iMonth) + FormatLunarDay(iDay));
  end;
end;

function GetLunarHolDay(iYear,iMonth,iDay:Word):string;
begin
  Result:=GetLunarHolDay(EncodeDate(iYear,iMonth,iDay));
end;
end.

上一篇:Delphi語言優(yōu)化

下一篇:Delphi中??考夹g(shù)的實(shí)現(xiàn)

發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
學(xué)習(xí)交流
熱門圖片

新聞熱點(diǎn)

疑難解答

圖片精選

網(wǎng)友關(guān)注

狂野欧美性猛交xxxxx视频| 日本欧美视频在线观看| 日韩精品欧美成人高清一区二区| 国产亚洲精品高潮| 国产精品丝袜高跟| 欧美亚洲色图视频| 波多野结衣一二区| 国产亚洲自拍一区| 波多野结衣影片| 国产精品宾馆在线精品酒店| 91在线观看免费高清完整版在线观看| 成人精品美女隐私视频| 亚洲精品成人无码毛片| 日韩精品一区二区三区av| 久久亚洲成人精品| 精品区一区二区| 亚洲成人黄色av| 午夜成人鲁丝片午夜精品| 久久久久久久一| 亚洲网友自拍偷拍| 国产日韩欧美在线观看| 欧美性感美女一区二区| 在线观看欧美精品| 亚洲av熟女高潮一区二区| 希岛爱理一区二区三区av高清| 欧美久久久久久久| 你懂的视频在线一区二区| 亚洲国产日韩欧美在线动漫| 国产精品欧美日韩一区| 国产精品毛片无码| 亚洲天堂成人av| 精品欧美色视频网站在线观看| 在线天堂中文字幕| 91官网在线| 亚洲激情国产| 久久一区二区免费播放| 亚洲午夜久久久| 日韩www在线| 欧洲精品视频在线| 九色蝌蚪自拍| 国色天香久久精品国产一区| 国产亚洲污的网站| av一区在线播放| 9色视频在线观看| 野外性xxxxfreexxxxx欧美| 国产精品一级伦理| 国产精久久一区二区三区| 91久久偷偷做嫩草影院| 成人欧美一区二区三区黑人免费| 国产精品午夜一区二区欲梦| 亚洲精品视频网址| 欧美色图校园春色| 亚洲高清毛片一区二区| 国产呦小j女精品视频| 久久久www成人免费毛片麻豆| 成年人视频免费看| 男女男精品网站| 欧美性受xxxx黑人xyx| 国产偷国产偷亚洲高清人白洁| 123成人网| 国产情侣小视频| 欧美丝袜丝nylons| 久久不射网站| 精品国产不卡一区二区三区| 国产探花一区二区三区| 肥臀熟女一区二区三区| 国产一区二区三区精品欧美日韩一区二区三区| 97av在线视频免费播放| 伊甸园亚洲一区| 亚洲精品播放| 欧美电影一区| 久草在线中文最新视频| 日韩一区二区三区精品视频| 日本道中文字幕| 午夜免费福利小电影| 依依成人在线视频| 性欧美videos精品| 国产精品福利视频一区二区三区| 91不卡在线观看| 日韩丝袜美女视频| 亚洲综合国产精品| 天天综合天天色| 好操啊在线观看免费视频| 天堂网av在线播放| 黄网在线免费看| 777久久精品一区二区三区无码| 一区二区三区一级片| 美女一区二区在线观看| 私人影视中文字幕| 成人黄色免费网站在线观看| 国产精品久久久久aaaa| 欧美日韩激情四射| 88国产精品视频一区二区三区| 伦理电影国产精品| www.久久av| 成人日韩在线电影| 三日本三级少妇三级99| 亚洲日本欧美日韩高观看| 中国 免费 av| 亚洲激情第一区| 亚洲乱码中文字幕久久孕妇黑人| 亚洲国产毛片完整版| 欧美精品国产一区| 日韩性xxx| 精品福利免费观看| 国产一区二区日韩精品| 亚洲成av人片在线观看| 日韩av在线一区| 999精品色在线播放| 黄色一级大片在线免费看国产一| 精品国产免费无码久久久| 7777精品伊人久久久大香线蕉的| 在线播放一区二区精品产| 91精品视频播放| 亚洲色图.com| 最全影音av资源中文字幕在线| 秋霞a级毛片在线看| 一级片在线观看免费| 人成网站免费观看| 成人做爰69片免费看网站| 精品孕妇一区二区三区| 亚洲国产精品一区二区三区| 91网页版在线登录入口| 久久综合综合久久综合| 人操人视频在线观看| 久久黄色片视频| 亚洲传媒在线| 免费日韩电影在线观看| 日本a视频在线观看| 国产欧美日韩精品一区二区三区| 精品视频麻豆入口| 欧美亚洲视频一区| 亚洲成人精品视频在线观看| 国产精品入口麻豆免费| 加勒比视频一区| 精品入口蜜桃| 欧美一区二区三区精美影视| 看欧美ab黄色大片视频免费| 中文字字幕在线中文乱码电影| 天天操天天操天天操天天操天天操| 欧美视频一区在线观看| 成人精品国产一区二区4080| 亚洲女人毛茸茸高潮| 久久精品www人人爽人人| 久久久噜噜噜久久| 日韩在线精品视频| 亚洲a一区二区三区| 中文字幕的av| 91精品国产入口| 制服下的诱惑暮生| 日韩视频不卡| 国产精品自在线| 久久r热视频| 国产激情精品一区二区三区| 国产精品一级久久久| 国模吧精品人体gogo| 亚洲欧洲精品在线观看| 国产精品视频久久久久| 欧美69精品久久久久久不卡| 欧美在线观看一区| 国产精品xxx在线观看www| 黄色片网址在线观看| 精品视频在线观看网站| 99国产精品99久久久久久| 91久久久久久久久久久久| 人妖一区二区三区| 国产精品丝袜白浆摸在线| 欧美视频免费看| 国产精品高潮粉嫩av| 国产一区二区三区在线免费观看| 亚洲色欲综合一区二区三区| 影音先锋成人在线电影| jizzjizzjizz美国| 国产精品中出一区二区三区| 国产小视频国产精品| 成人免费高清完整版在线观看| 久久精品无码av| sm捆绑调教国产免费网站在线观看| 一二三四在线视频观看社区| 欧美男女爱爱视频| 欧美艳星brazzers| 无线免费在线视频| 国产在线|日韩| www.激情网.com| 国产精品视频一区二区三区综合| 欧美中文字幕一二三区视频| 999av视频| 91久久奴性调教| 天堂免费在线视频| 日本中文字幕网| 国产毛片aaa| 丰满少妇在线观看网站| 蜜桃色永久入口| 国产色产综合色产在线视频| 亚洲精品久久7777777| 91精品久久香蕉国产线看观看| 欧美色图中文字幕| 亚洲国产精久久久久久久| 96久久久久久| 四虎4545www精品视频| 超碰影院在线| 久色视频在线播放| 欧美韩日一区二区三区四区| 91xx在线观看| 亚洲国产精品久久久久蝴蝶传媒| 国产亚洲精品久久久久久| 亚洲精品日产精品乱码不卡| 亚洲最新在线观看| 最新91在线视频| 精品久久久中文字幕人妻| 欧美韩国日本在线观看| 久久精品国产99国产| 美女主播视频一区| www·91·com| 亚洲欧美成人vr| 色综合久久精品亚洲国产| 国产精品电影一区二区| 国产成人av资源| 中文字幕在线国产| 中国女人特级毛片| 秋霞欧美一区二区三区视频免费| 天天躁日日躁狠狠躁欧美巨大小说| 久久成人国产精品| 亚洲第一影院| 精品久久免费观看| 极品美乳网红视频免费在线观看| 特黄特色特刺激视频免费播放| 麻豆精品一区二区三区视频| 日本一区二区电影| 中文乱码免费一区二区三区下载| 欧美日韩日本国产| 男人打飞机网站| 国产麻豆精品视频一区二区| 传媒在线观看| 国产大学生粉嫩无套流白浆| 色影院视频在线| 亚洲一区二区久久久| 欧美午夜精品一区二区三区| 国产精品丝袜久久久久久高清| 亚洲国产一区二区三区在线播放| 亚洲精品视频久久久| 亚洲国产视频一区| 久草在线新免费首页资源站| 影音先锋国产在线资源| 欧美色视频日本高清在线观看| 欧美亚洲国产精品| 韩国av一区二区| 成人免费网站www网站高清| 成人黄色免费观看| 最近免费中文字幕大全免费版视频| xxxx欧美18另类的高清| 久久婷婷亚洲| 久草视频在线免费| 欧美无毛视频| 欧美xxxx在线| 国产精品久久久久久9999| 中国极品少妇videossexhd| 丰满少妇被猛烈进入高清播放| 性色av一区二区| 欧美国产精品久久| 日韩在线播放一区| 四虎wwwcom| 亚洲精品视频在线观看免费视频| 高跟丝袜一区二区三区| 99c视频在线| 老司机aⅴ在线精品导航| 国产又爽又黄视频| 日韩美女主播视频| 中文字幕在线观看91| 成人天堂yy6080亚洲高清| 岛国av免费在线观看| 99re6在线观看| 久久福利视频导航| 午夜爽爽视频| 国产蜜臀97一区二区三区| 精品国产乱码久久久久久蜜坠欲下| 国内精品卡一卡二卡三新区| 亚洲人体av| 国产私拍福利精品视频二区| 免费久久久一本精品久久区| 1769国内精品视频在线播放| bl视频在线免费观看| 日韩亚洲欧美在线| 国产精品丝袜久久久久久不卡| 国产精品剧情| 99久热在线精品视频观看| 日韩电影网站| 日韩欧美精品一区二区综合视频| 中文字幕视频网| 欧美日韩少妇| 国产精品爽爽爽爽爽爽在线观看| 免费精品一区二区| 久久精品国产亚洲a∨麻豆| 中文字幕在线视频网站| 黄色网址电影| 亚洲免费激情视频| 国产毛片欧美毛片久久久| 一区二区三区四区电影| 亚洲欧美偷拍另类a∨色屁股| 精品视频在线观看一区二区| 欧美欧美全黄| 日本成人一区二区| 视频在线一区二区| 一区二区三区网址| 精品无码久久久久成人漫画| 国产av人人夜夜澡人人爽| 日韩美女一级视频| 无码人妻精品一区二区三区夜夜嗨| 6080成人| 日本边添边摸边做边爱的第三级| 亚洲国产成人一区| 九九视频免费看| 国产精品久久精品国产| 中文幕一区二区三区久久蜜桃| 日韩妆和欧美的一区二区| 亚洲精品福利资源站| 嗯啊主人调教在线播放视频| 国产裸体视频网站| 一个人看的www视频免费在线观看| 日韩av在线中文字幕| 看黄网站在线观看| 欧美美女喷水视频| 九九热这里只有| 国产亚洲精品自在线观看| 两个人看的在线视频www| 日本少妇激三级做爰在线| 国产精品国产三级国产专区53| 写真福利精品福利在线观看|