Ich brauch nur die Uhrzeit und lese nur Uhrzeit raus der Wert der eingegeben wird ht keine sec
Kannst du mir nicht vlt sagen ob ich oben vlt nur was ändern bracu (lol)
denn ich finde im mom keine passende funktion hier also die eine macht es in std die andere in min die andere in sec aber keine die hingeht und sagt std+min+sec
Beispiel
ich brauch
Uhrzeit: 12:36:24
Eingabe: 11:00
Differenz: 23:23:36
die funktionen geben
Std: 23
Min : 1403
sec: 84216
also muss ich es anderst machen
//EIDT:\\
habe mal was getestet
Zitat:
procedure TForm1.Button1Click(Sender: TObject);
var Uhrzeit_jetzt : string ;
Uhrzeit_Ende, Uhrzeit_Verbleib : Ttime;
begin
edit1.Text := Timetostr(Time);
Uhrzeit_Ende := strtoTime('23:00:00');
edit2.text := Timetostr(Uhrzeit_Ende);
Uhrzeit_Verbleib := Time - Uhrzeit_ende;
edit3.text := timetostr(Uhrzeit_Verbleib);
end;
nun muss ich noch überprüfen welcher görßer ist um dann auch wenn ich zb
Uhrzeit: 12:36:24
Eingabe: 12:00
Differenz: 0:36:24
habe das nicht angeszeigt bekomme sondern 23 also uss ich das ganze noch von 24:00:00 abziehen oder net??