String To Int/Time

[lbccaleb]

Delphi-Quellcode:

var
  TimeToAdd: TDateTime;
  NeueUhrzeit: String;
begin
  TimeToAdd := StrToTime(Edit1.Text);
// jetzt kannst du mit folgenden bsp zb sekunden min und so addieren (die 1 kann auch geändert werden zu 20 oder weiß ich was):

  TimeToAdd := IncMinute(TimeToAdd, 1); //addiert ne min
  TimeToAdd := IncHour(TimeToAdd, 1); //addiert ne stunde
  TimeToAdd := IncSecond(TimeToAdd, 1); //addiert ne sekunde
  TimeToAdd := IncMilliSecond(TimeToAdd, 1); //addiert ne millisekunde


//und dann noch alles wieder in einen string gewandelt:
  NeueUhrzeit := TimeToStr(TimeToAdd);

end;

so sollte es eigentlich gehen, nicht getestet!!

edit verständnis halber noch was geändert!!