年:=FormatDateTime('YYYY',DATE);
月:=FormatDateTime('MM',DATE);
月:=FormatDateTime('MM',DATE);
解决方案 »
- 请问如何将TQuery中的数据取出来并格式化呢???
- ADOQuery
- 谁知道怎么截取游戏里的屏幕
- oicq及网络游戏服务器和客户端是如何交换数据的?重谢!
- Acess数据库中存取图形及二进制数,字段应为什么类型及如何存取???
- 怎樣改變第三方控件默認的CAPTION 屬性?
- 还是串口通讯和格式转换(分数嫌少,可以加,直到把我的用分1000分用完)
- 请问在combobox中如何加入列表
- TTreeView怎么构建层次树形结构(数据库相关)?
- 请问如何载入图片到ImageList控件中?
- DELPHI的BED不用学了??????高手来说一下!
- 请帮忙!! win2000下 delphi label 组件显示的字体右面少半个!!!
DWORD theyear,themonth;
begin
theyear:=yearof(date);
themonth:=monthof(date);
yy,mm,dd:word;
begin
decodedate(now,yy,mm,dd);
edit1.text:=inttostr(yy);
//其中now表示当前时间,decodedate是分解年月日的函数
end;