关于Delphi时间加减问题,紧急求助啊
各位大哥,小弟有一问题需要紧急求助一下.

我有这样一个需求

我现在有Edit1里面显示为 2007-05-22 18:22:00 另外一个Edit2里有值35

我现在想用Button1把18:22:00的分钟加上35显示在Edit12007-05-22 18:57:00里.

这个时间应该怎么写,拜托各位大哥大姐帮帮啊.

小弟分不多,希望大家能帮帮啊


[解决办法]
给个提示吧：

procedure TForm1.Button1Click(Sender: TObject);
var
Present: TDateTime;
Year, Month, Day, Hour, Min, Sec, MSec: Word;
begin
Present:= Now;
DecodeDate(Present, Year, Month, Day);
Label1.Caption := 'Today is Day ' + IntToStr(Day) + ' of Month '
+ IntToStr(Month) + ' of Year ' + IntToStr(Year);
DecodeTime(Present, Hour, Min, Sec, MSec);
Label2.Caption := 'The time is Minute ' + IntToStr(Min) + ' of Hour '
+ IntToStr(Hour);
end;

[解决办法]
uses DateUtils;

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit2.Text := FormatDateTime( 'YYYY-MM-DD HH:MM:SS ', IncMinute(StrToDateTime(Edit1.Text), 35));
end;
[解决办法]
费了半天的劲，运行通过
edit1.Text:=formatdatetime( 'yyyy-MM-dd hh:mm:ss ',StrToDateTime(formatdatetime( 'yy-MM-dd hh:mm:ss ',now()))+35*60/(24*3600));