Hallo
DP'ler...
Also, ich arbeite zur Zeit an einem kleinem Projekt. Nichts großes bzw besonderes. Dort geb ich auf einem Label die Zeit aus.
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
lblUhrzeit.Caption := TimeToStr(time);
end;
Soweit so gut. Dann kann ich in einem Editfeld eine frei wählbare Uhrzeit ausgeben ('22:22:22' als BSP). Sobald ich die gewünschte funktion aktviere, wird ein Timer Enabled, der dauerhaft die Uhrzeit des Labels mit der Uhrzeit im Edit vergleich.
Delphi-Quellcode:
IF lblUhrzeit.Caption = edtUhrzeit.text THEN BEGIN
// [..]
END;
Stimmt nun die Zieluhrzeit (Edit) mit der aktuellen Uhrzeit (Label) überein, ist der Code aktiv. Das funktioniert soweit auch alles.
Allerdings möchte ich nun, wenn die Zeit abgelaufen ist, eine neue Zielzeit berechnen. Sprich die wir haben es 22:22:22 und der Code ist einmal durchlaufen. Bisher war es so, das einfach die CheckBox nicht mehr abgehackt ist. Ich möchte aber, das die Zieluhrzeit aus dem Editfeld von 22:22:22 auf 22:52:22 gesetzt wird. Sprich +30 Minuten.
Welches ist hier die am besten geeigntste Lösung?
gruß