随笔分类 -  delphi

delphi分割字符串
摘要：procedure TForm1.btn1Click(Sender: TObject);var constr,str,str1,str2,str3,str4:string; strs :TStrings; i:Integer;beginconstr:='1-2-3';strs := TStringL 阅读全文
posted @ 2022-05-11 17:21 Zhao's_Blog 阅读(230) 评论(0) 推荐(0) 编辑
获取时间间隔
摘要：YearSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的年间隔MonthSpan(DateTime1, DateTime2) //返回DateTime1, DateTime2的月间隔WeekSpan(DateTime1, DateTime2) 阅读全文
posted @ 2021-07-13 10:44 Zhao's_Blog 阅读(68) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示