[Daniil]

Помогите реализовать новичку любителю!!
Суть программы заключается в том, что необходимо реализовать на Delphi формулу работающую в Exel:формула (=D2-B3+B4).
Необходимо сложить текущее время и дату:

Код:

1 2 3 4

procedure TForm1.Timer1Timer(Sender: TObject); begin edit8.Text:=(''+TimeToStr(now)); end;

С указанным временем поступившего сигнала, введенного вручную в edit или лучше в MaskEdit1 и отнять время оперативного скачка так-же введенного вручную в edit или лучше в MaskEdit1.
Вот мой код: Дата прибавляется!! на время введенное в ручную а время отображается текущее.

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23

procedure TForm1.BitBtn1Click(Sender: TObject); begin  if edit4.Text='' then      hour:=0   else    begin      hour:=StrToInt(edit4.Text);     end;      if edit5.Text='' then      min:=0   else    begin      min:=StrToInt(edit5.Text);         end;       end;     a:= Now;     b:= IncHour(a, hour);   c:= IncMinute(b,min);     edit1.text:='' + TimeToStr(c);    edit9.Text:=''+DateTostr(c);

MAD: пользуемся тегами!
D2-Текущее время и дата выводимое командой TimeToStr(now)
B3-вводимое в ручном режиме время поступившего звонка
B4-оперативный скачек вводимый в ручную количество дней в формате времени.