Delphi 时间加减问题 紧急求助
各位大哥,小弟有一问题需要紧急求助一下.我有这样一个需求我现在有Edit1里面显示为2007-05-2218:22:00另外一个Edit2里有值35我现在想用Button...
各位大哥,小弟有一问题需要紧急求助一下.
我有这样一个需求
我现在有Edit1里面显示为 2007-05-22 18:22:00 另外一个Edit2里有值35
我现在想用Button1把18:22:00的分钟加上35显示在Edit12007-05-22 18:57:00里.
这个时间应该怎么写,拜托各位大哥大姐帮帮啊.
小弟分不多,希望大家能帮帮啊 展开
我有这样一个需求
我现在有Edit1里面显示为 2007-05-22 18:22:00 另外一个Edit2里有值35
我现在想用Button1把18:22:00的分钟加上35显示在Edit12007-05-22 18:57:00里.
这个时间应该怎么写,拜托各位大哥大姐帮帮啊.
小弟分不多,希望大家能帮帮啊 展开
1个回答
展开全部
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text:=DateTimeToStr(StrToDateTime(Edit1.Text)+StrtoDateTime('0:'+Edit2.Text+':0'));
end;
Edit2的值最大不能超过59
begin
Edit1.Text:=DateTimeToStr(StrToDateTime(Edit1.Text)+StrtoDateTime('0:'+Edit2.Text+':0'));
end;
Edit2的值最大不能超过59
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
