[Daniil]

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

Код:

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

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

Код:

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;
     
  
 a:= Now;  
  b:= IncHour(a, hour);
  c:= IncMinute(b,min);
 
  edit1.text:='' + TimeToStr(c); 
  edit9.Text:=''+DateTostr(c);

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