Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Differenz zwischen Zeit und Datum (https://www.delphipraxis.net/138024-differenz-zwischen-zeit-und-datum.html)

DeddyH 2. Aug 2009 15:47

Re: Differenz zwischen Zeit und Datum
 
Du willst von einem Datum eine gewisse Zeitspanne subtrahieren. Also musst Du doch nur errechnen, wieviele Tage das sind und vom Ursprungsdatum abziehen. Ein Stunde und 10 Minuten sind demnach 1/24 + 1/24/60 * 10.

jaenicke 2. Aug 2009 16:03

Re: Differenz zwischen Zeit und Datum
 
Zitat:

Zitat von TM4rkuS
und deren Hilfe aus irgendeinem unerfindlichen Grund nicht funktioniert schon

Dann würde ich mich darum einmal kümmern. Kann es sein, dass du noch eine uralte Delphiversion wie Delphi 7 benutzt und dazu Vista? Dann musst du das entsprechende Update für Vista installieren wie hier beschrieben.

Zudem gibt es auch eine Onlinehilfe...
http://docs.codegear.com/products/ra...DateUtils.html

sx2008 2. Aug 2009 16:28

Re: Differenz zwischen Zeit und Datum
 
Es gibt zwei (seltsamerweise kaum bekannte) Funktionen: Int() und Frac().

Int() liefert den ganzzahligen Anteil vor dem Komma und ist damit eng verwandt mit Trunc().
Der Unterschied zwischen Int() und Trunc() ist der Rückgabewert:
Int() liefert Extended, während Trunc() ein Int64 zurück gibt.

Frac() liefert den Nachkommaanteil.

Jetzt muss man noch wissen, dass ein Tag = 24 Stunden dem Wert 1.0 im TDateTime-System entsprechen.

Delphi-Quellcode:
var
  a, b, c : TDateTime;
begin
  a := Now; // Aktuelles Datum + Uhrzeit
  b := Int(a); // nur das Datum ohne Uhrzeit bzw. Uhrzeit 0:00:00
  c := Frac(a); // nur die Uhrzeit

TM4rkuS 2. Aug 2009 19:04

Re: Differenz zwischen Zeit und Datum
 
sx2008, das ist exakt das, was ich gesucht habe =) Danke... Gibt's hier irgendwo einen Danke-Knopf?^^


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:16 Uhr.
Seite 2 von 2     12   

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