求助:如何对word进行日期赋值 本帖最后由 duronshi 于 2011-07-11 09:12:07 编辑 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 ve := (Year-2000) SHL 9 + Month SHL 5 + Day;适合Year>=2000 非常感谢两位的回答, kiboisme 的回答基本上已经解决我的问题,是用左移来解决,我想按位进行操作,要如何做呢?谢谢 uses DateUtils ve:= ( YearOf(Now)-2000) shl 9 + MonthOf(now)SHL 5 + DayOf(now); 问一个句柄的问题 插件开发 请教关于SQL的问题! 这个问题提了老半天没人解决,另开贴给分...得到其他Exe菜单项的ID,并执行 怎样将TOleStream的值写到TMemoryStream内 DELPHI中如何把一个JPG的图象转化为PDF格式的,敬请各路好手支招 help,help,sql!!! 请问如何获得一个MSSQL的所有数据库名??? Dbgrid的问题!急,在线等! 统计出table1中dm字段的内容为"002"的有几个,怎么办?请指教! 批量插入数据时,如何添加凭证号? Sleep在Delphi7中是什么意思?
适合Year>=2000
uses
DateUtils ve:= ( YearOf(Now)-2000) shl 9 + MonthOf(now)SHL 5 + DayOf(now);