Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Differenz zwischen zwei Zeiten (https://www.delphipraxis.net/8321-differenz-zwischen-zwei-zeiten.html)

BorlanDelphiUser 2. Sep 2003 12:22


Differenz zwischen zwei Zeiten
 
Hallo,
wie kann ich die Differenz zweier Zeiten berechnen z.B.
08:00:00 und 12:03:00 sodass als Ergebnis 04:03:00 erhalte

Gruß René

Sharky 2. Sep 2003 12:31

Re: Differenz zwischen zwei Zeiten
 
Zitat:

Zitat von BorlanDelphiUser
Hallo,
wie kann ich die Differenz zweier Zeiten berechnen z.B.
08:00:00 und 12:03:00 sodass als Ergebnis 04:03:00 erhalte

Gruß René

Mal so aus dem Bauch :-D

ZeitUnterschied := Zeit2 - Zeit1;

neolithos 2. Sep 2003 12:33

Re: Differenz zwischen zwei Zeiten
 
Such mal in der VCL-Hilfe nach

Delphi-Quellcode:
DaySpan
und klicke Siehe auch

vielleicht hilft es...

Dannyboy 2. Sep 2003 12:34

Re: Differenz zwischen zwei Zeiten
 
Code:
Mal so aus dem Bauch

ZeitUnterschied := Zeit2 - Zeit1;

Lol, das ist sehr logisch. :wink:
Das werd' ich nie vergessen :lol:

Sharky 2. Sep 2003 12:36

Re: Differenz zwischen zwei Zeiten
 
Zitat:

Zitat von Dannyboy
...Lol, das ist sehr logisch. :wink:
..

Und weil es so schön logisch ist funktioniert es auch

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
 zeitunterschied,
 zeit1,
 zeit2           : TTime;
begin
 zeit1 := StrToTime (Edit1.Text);
 zeit2 := StrToTime (Edit2.Text);
 zeitunterschied := zeit2 - zeit1;
 Label1.Caption := TimeToStr (zeitunterschied);
end;
:lol:

[EDIT] Kleinen Tipfehler beseitigs[/EDIT]


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:23 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz