datetimepicker控件怎么分离年月日?

JoeChen 2004-01-16 10:36:40
datetimepicker控件取得的日期怎么分离年月日三项为strYear,strMonth,strDay?
谢谢!~~~
...全文
103 12 打赏 收藏 转发到动态 举报
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
ylan53 2004-01-16
  • 打赏
  • 举报
回复
用这个函数就行
DecodeDate(datetimepicker.date, Year, Month, Day)
xiaoqiang123 2004-01-16
  • 打赏
  • 举报
回复
DecodeDate(datetimepicker.date, Year, Month, Day)
yongxin800 2004-01-16
  • 打赏
  • 举报
回复
看来我只有接分了
dengyueguang 2004-01-16
  • 打赏
  • 举报
回复
decodedate()
JoeChen 2004-01-16
  • 打赏
  • 举报
回复
delphi的帮助,不能关键字检索,而且我的还是英文版的~~!
JoeChen 2004-01-16
  • 打赏
  • 举报
回复
我们这些初学者去哪里找这些函数? 有人整理了这些基本函数大全吗? 谁有?!
czh@chinaschool.net
谢谢了~~~
vargent77 2004-01-16
  • 打赏
  • 举报
回复
用formatdatetime阿,要年就edit1.Text:=formatdatetime('yyyy',datetimepicker1.Date);
delphiseabird 2004-01-16
  • 打赏
  • 举报
回复
可以用formatdatatime实现
也可以用截取字符串的形式得到你想要的形式
hch_45 2004-01-16
  • 打赏
  • 举报
回复
DecodeDate(datetimepicker.DateTime, Year, Month, Day)
dulei115 2004-01-16
  • 打赏
  • 举报
回复
Unit
DateUtils

function YearOf(const AValue: TDateTime): Word;
function MonthOf(const AValue: TDateTime): Word;
function WeekOf(const AValue: TDateTime): Word;
function DayOf(const AValue: TDateTime): Word;
function HourOf(const AValue: TDateTime): Word;
function MinuteOf(const AValue: TDateTime): Word;
function SecondOf(const AValue: TDateTime): Word;
function MilliSecondOf(const AValue: TDateTime): Word;
noil0125 2004-01-16
  • 打赏
  • 举报
回复
var
Present: TDateTime;
Year, Month, Day: Word;
begin
Present:= Now;
DecodeDate(Present, Year, Month, Day);
end;
hch_45 2004-01-16
  • 打赏
  • 举报
回复
var
Year, Month, Day: Word;
begin
DecodeDate(datetimepicker.date, Year, Month, Day)
end;

5,392

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧