截取日期的年份?

sixgj 2017-11-25 03:39:01
一串日期如:


1990-01-02
1990-02-02
1991-01-01
1992-01-01
1994-01-02

如何截取成

1990
1991
1992
1994
...全文
647 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
sixgj 2017-12-01
  • 打赏
  • 举报
回复
谢谢各位回复.
sixgj 2017-11-29
  • 打赏
  • 举报
回复
谢谢各位。谢谢各位。
liaospring 2017-11-27
  • 打赏
  • 举报
回复
使用TStringList类,将storted := true。使用add,重复记录不增加。
hongss 2017-11-27
  • 打赏
  • 举报
回复
先按照楼上各位的办法截取成年份,再判断唯一性放入容器保存
qiankunbobo 2017-11-27
  • 打赏
  • 举报
回复
YearOf(StrToDate('1994-01-02'))
lyhoo163 2017-11-26
  • 打赏
  • 举报
回复
IntToStr(YearOf(Date));
秋天之落叶 2017-11-26
  • 打赏
  • 举报
回复
那是什么意思?一行日期数据截出年份吗?
sixgj 2017-11-26
  • 打赏
  • 举报
回复
不是这个意思了。
日月路明 2017-11-26
  • 打赏
  • 举报
回复
方法很多,例如:formatDateTime('yyyy',getDate())
doloopcn 2017-11-25
  • 打赏
  • 举报
回复
copy(YourDateStr,1,4)
qtc26 2017-11-25
  • 打赏
  • 举报
回复
如果是日期格式:yearof(t)); 如果是字符串格式:leftstr(t,pos('-',t)-1);

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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