如何获得当前的年,月,日(分别获得)并将所获的年数保留后两位,即2003保留为03
解决方案 »
- Listview ViewStyle属性为vsReport怎么显示像DBGrid那样有线条的样子的啊?
- 请问Delphi7上怎么没有TClientSocket和TServerSocket控件呀?
- 请教各位 怎样才能知道用鼠标单击dbgrid控件 选中的列的 " 多行值 “呢? 急急!!!!
- form中有 一个 edit 和一个listboxedit,edit中有数据,listbox中有很多数据项,
- 如何用adocommand建立数据库,存储过程等
- 注册表的小问题?在线等。立刻给分
- 关于动态报表的问题.
- 俺笨,不知到关于SMS的开发!
- Can't load package dclite70.bpl
- 有用过TEmbeddedWB的高手吗?
- 一个Idhttp的问题
- 一个奇怪的问题?
yearstr:=strtoint(copy(inttostr(year),2,3));
monthof(now)
dayof(now)
yearstr:=strtoint(copy(inttostr(year),2,3));
monthof(now)
dayof(now)
一个笨办法.
strDate:=formatdatetime('yymmdd',now);
然后用字符串堆取函数
copy(strDate,1,2) 年
copy(strDate,3,2) 月
copy(strDate,5,2) 日
monthof(now)
dayof(now)
年自己在取一次
copy(inttostr(yearof(now)),3,2);