Mit TimeToStr rechnen

[Chegga]

Hi,

wie schon der Titel sagt, würde ich gerne mit der TimeToStr-Funktion rechnen.
Und zwar so:

Mit

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Panel1.Caption := TimeToStr(Time);
end;

"hole" ich mir die aktuelle Uhrzeit in das Panel.
Nun soll man z.B. 15 Minuten per Edit "dazuzählen" können.
Sprich:
Der User setzt in das Editfeld 15 ein und per Button.Click
werden 15 Minuten zur aktuellen Zeit hinzugezählt.
(Das Ergebnis könnte dann z.B. in einem anderen Panel angezeigt werden.)
Wie kann man das in Pascal umsetzen? :gruebel:
Ich komme nicht drauf. :wall: :oops:

MfG Marc

[Nicodius]

addiere zwei zeiten (suche hier im forum)


die erste zeit + die zweite zeit die du aus den edit feldern zusammenstellst(hier suchen)

ganz einfach vom logischen ehr ;)

[marabu]

Die Einheit von TDateTime ist der Tag - 2.5 bedeutet also 2 Tage und 12 Stunden. 15 Minuten sind dann 1.0 / 96 - wenn ich meine Sinne noch bei mir habe. Einfach drauf addieren.

Grüße vom marabu

[Chegga]

Hi,

dank Nicodius habe ich das hier gefunden: *Klick*
Jetzt klappt alles einwandfrei! :)

MfG Marc

P.S.: Ich habe es mal wieder komplizierter versucht, als es ist. :wall:

[Nicodius]

kein problem - *g* ist meistens so dass mans sich einfach zu kompliziert vorstellt :mrgreen: