![]() |
TDate enthält Uhrzeit?
Hi Leute,
ich habe eine Prozedur mit einem Parameter TDate. Dieser Prozedur übergebe ich einen TDateTime Wert. Wenn ich nun innerhalb dieser Prozedur den TDate-Wert im Debugger anschaue, enthält dieser immernoch den Uhrzeit-Anzeil - warum ist das so? Wenn TDate auch die Uhrzeit entält, warum gibt es dann TDate und TDateTime? |
AW: TDate enthält Uhrzeit?
Es gibt auch noch TTime, aber alle 3 sind vom Typ double.
|
AW: TDate enthält Uhrzeit?
Schau mal an wie TDate definiert ist:
Delphi-Quellcode:
das ist also nur ein Alias von TDateTime. Und die Datums- und Zeittypen sind letztlich Doubles:
TDate = type TDateTime;
Delphi-Quellcode:
wobei die Zahl vor dem Komma die Tage und das nach dem Komma die Uhrzeit des angegebenen Tages darstellt.
TDateTime = type Double;
Grüße |
AW: TDate enthält Uhrzeit?
Ich denke, dass es Vollständigkeithalber der Fall ist. TDate und TDateTime sind beide vom Typ Extended und enhalten eben auch die Zeit. Bei TDate wird aber dann wohl nur die Nachkommastelle nicht einfach abgeschnitten, sondern beibehalten. Wäre ja sonst jedes Mal ein Mehraufwand das abzuschneiden. Was jedenfalls hinter dem Komma steht ist für Methoden, die mit TDate arbeiten dann egal, denn es ist ja nur das Datum interessant und dafür sind die Stellen für dem Komma gedacht.
|
AW: TDate enthält Uhrzeit?
Danke für die schnellen Antworten.
Sinnig finde ich das ganze aber nicht. Wenn ich schon explizit TDate verwende, will ich wohl auch nur das Datum haben. Ansonsten Kann ich auch immer TDateTime verwenden wenn ich mir dann eh mit Trunc nur das Datum rausholen muss. |
AW: TDate enthält Uhrzeit?
Es gibt sonst auch noch die Funktion
Delphi-Quellcode:
. Macht nix anderes als Trunc(), verbessert aber (in meinen Augen) die Lesbarkeit des Codes, weil der Funktionsname sprechender ist.
DateOf()
|
AW: TDate enthält Uhrzeit?
da der Typ der selbe ist, müsste der Trunc bei jedem Schriebzugriff durchgeführt werden, und nicht nur wenn die Nachkommastelln stören
|
AW: TDate enthält Uhrzeit?
TDate(time) basiert auf as Windows OLE DateTime-Format:
![]() |
AW: TDate enthält Uhrzeit?
Wie schon erwähnt wurde, sind diese 3 Typen (TDateTime, TDate und TTime) intern nur Double, welche Datum und Uhrzeit enthalten können.
Diese Typen besitzen untereinander (leider) keine Konvertierungsfunktionen, welche z.B. Datum oder Zeit entfernen. Es sind also reine Informationstypen, welche dem "Programmierer" mitteilen welche Inhalte er dafür vorgesehn hat, aber es mußt nicht nur das darin enthalten sein. ![]() ![]() ![]() ![]() PS: Es gibt auch den atTimePciker, welcher Property ala .Date und .Time enthält, wo man auch glatt vergessen hatte (weiß jetzt nicht ob's inzwischen mal behoben wurde) darin auf diese Zeitbereiche einzuschränken, so daß man bei .Time auch das Date mit drin hatte. :wall: Was man machen könnte, wären eigene Typen für die Date/Time-Behandlung (ein Double/TDateTime in einem Record), wo über Operatoren entsprechende Umwandlungen und Fehlermeldungen (z.B. beim Versuch einen TTime an einen TDate zuzuweisen) implementiert sind. Oder man nutzt die schon fertigen Typen wie z.B.
Delphi-Quellcode:
.
TTimeSpan
|
AW: TDate enthält Uhrzeit?
Es gibt schon einen Unterschied. Deklariert man eine Methode á la
Delphi-Quellcode:
, so kann man keinen TDateTime als Parameter übergeben, da die Typen nicht übereinstimmen.
(var: Value: TDate)
|
AW: TDate enthält Uhrzeit?
Es ist schon etwas schwer, eine Begründung dafür zu liefern, das ein Wert vom Typ 'TDate' auch eine Uhrzeit enthält, ein Wert vom Typ 'TTime' auch das Datum und 'TDateTime' beides. Weiterhin ist es nicht leicht, die Existenz der drei Datentypen zu rechtfertigen, wo es einer genauso täte.
Das das so ist, scheint nun jeder begriffen zu haben, aber klar im Sinne von 'klarer Code' ist das mit Sicherheit nicht, eher das Gegenteil. Verwirrend. :freak: |
AW: TDate enthält Uhrzeit?
Delphi-Quellcode:
type
TDateOnly= class(TInterfacedObject) private FValue:Double; procedure SetValue(const Value: Double); Property value:Double Read Fvalue Write SetValue ; End; implementation {$R *.dfm} procedure TDateOnly.SetValue(const Value: Double); begin Fvalue := Trunc(Value); end; procedure TForm5.Button1Click(Sender: TObject); var d:TdateOnly; begin d.value := now; Showmessage(DateTimeToStr((d.value))); end; |
AW: TDate enthält Uhrzeit?
Zitat:
Zitat:
|
AW: TDate enthält Uhrzeit?
Zitat:
|
AW: TDate enthält Uhrzeit?
Zitat:
hm doch genau das funktionert ja - was mich auch dazu veranlasst hatte diesen Thread hier zu eröffnen.
Code:
procedure Test(ADate : TDate);
begin showmessage(DateTimeToStr(ADate)); end; procedure TForm1.Button1Click(Sender: TObject); var d : TDateTime; begin d := Now; Test(d); end; |
AW: TDate enthält Uhrzeit?
Zitat:
Delphi-Quellcode:
vor Value übersehen. (Den Doppelpunkt darfst du gerne weglassen. :mrgreen:)
var
|
AW: TDate enthält Uhrzeit?
Zitat:
Nach deiner Sichtweise könnten wir auch mit einem einzigen Zahlentyp aufwarten: 'TNumber', denn es ist ja die Schuld des Programmierers, wenn der Code dadurch nicht klar genug ist. Ich kann deine Sichtweise nachvollziehen, aber die Schlußfolgerung ist imho falsch. Zitat:
Zitat:
Ich verlange von meinen Datentypnamen, das das draufsteht, was drin ist. Nicht mehr und nicht weniger. TDate, TTime und TDateTime sollten nicht zuweisungskompatibel sein, denn ein TDateTime ist genaugenommen ein genauer Zeitpunkt (innerhalb der bekannten Grenzen), während ein TDate einfach nur ein Datum und TTime nur eine Zeit darstellen sollte. Desweiteren ist bei diesem Datentyp nicht zu vermitteln, wie die Differenz zwischen zwei Zeitpunkten wieder ein Zeitpunkt sein kann, das ist bescheuert und schlicht und ergreifend falsch. Genauso hirnrissig wie z.B. die Differenz zwischen zwei Temperaturangaben wieder als Temperatur anzugeben. Zwischen 5°C und 20°C liegen eben nicht 15°C sondern 15 K. Delphi halt. Pragmatik und zum-frickeln-einladend-praktisch kommt vor OOP. Das macht den jedoch Charme der Sprache aus. |
AW: TDate enthält Uhrzeit?
Zitat:
Zitat:
Genau so ist eine Differenz von 15°C gleich einer Differenz von 15K, die Einheiten sind ja gleich groß. Ich habe jetzt schon ein paar Minuten nachgedacht und die Zeit ist die einzige Skala, wo so markant zwischen Zeitpunkten und Zeiträumen unterschieden wird... |
AW: TDate enthält Uhrzeit?
Zitat:
Zitat:
![]() Zitat:
Nachtrag: Zitat:
|
AW: TDate enthält Uhrzeit?
Ich zitiere mal aus dem Link:
Zitat:
Das mit der Entfernung ist so ne Sache. Wenn ich sage "Fulda ist 100km entfernt und Würzburg 200km" dann hat die Differenz auch wieder die Einheit km. In C# gibt es ja Point und Size und ich habe da auch schon ein paar Mal konvertiert - vornehmlich von Size zu Point ;) |
AW: TDate enthält Uhrzeit?
Zitat:
Die Angabe von Orten wird nicht in Längeneinheiten angegeben, ihre Entfernung schon. Bei der Zeit, die ja auch eine Dimension ist, unterscheiden wir auch zwischen dem Zeitpunkt (=fester Ort) und dem Abstand (=Entfernung), beide Angaben werden mit unterschiedlichen Einheiten angegeben, was logisch ist, denn die Orte sind mehrdimensional, deren Entfernung jedoch nicht. Den Rest deiner Ausführungen (Point, Size, Entfernung) verstehe ich nicht. |
AW: TDate enthält Uhrzeit?
Zitat:
Bezogen auf das z.B. kartesische System ist die Differenz zweier Ortsvektoren (x, y, z) wiederum ein Vektor (x, y, z). Erst wenn eine Homogenisierung des Koordinatensystems durch Einführung einer vierten Koordinate (w) erfolgt, kann anhand des Inhalts eines solchen vierdimensionalen Vektors (Ort: w=1; Richtung: w=0) eine Unterscheidung erfolgen (Das FireMonkey-Koordinatensystem wie so ziemlich alle 3D-Systeme arbeiten z.B. damit; es ist aber nur ein Trick zur Vereinfachung der Rechenoperationen für den Programmierer). Ohne diese Erweiterung ist ein 3D-Vektor ein 3D-Vektor. Ein Orts-Vektor wird nur dadurch daraus, daß man ihn auf einen definierten Nullpunkt bezieht. Da es keinen (mir) bekannten absoluten Nullpunkt gibt, ist jeder Orts-Vektor auch nur ein Differenz-Vektor zu einem willkürlich gesetzten Bezugspunkt. Es gibt also keinen Unterschied zwischen Orts-Vektoren und Differenzen zwischen ihnen. Ebenso verhält es sich mit Zeitpunkten, die auch nur Differenzen zu einem willkürlichen Zeit-Nullpunkt sind. Vielleicht erinnert sich noch einer an die Änderung des Referenzdatums zwischen Delphi 1 und späteren Delphi Versionen. In Delphi 1 war ein TDate von 0 gleichbedeutend mit dem 31.12.1899, während in neueren Delphi-Versionen irgendein Tag um die Geburt eines galiläischen Zimmermannssohns herum als Referenz herhalten muss. |
AW: TDate enthält Uhrzeit?
Zitat:
kann es sein, dass Du dich da irrst? Zitat:
|
AW: TDate enthält Uhrzeit?
Delphi-Quellcode:
ShowMessage(DateTimeToStr(0));
Delphi-Quellcode:
ShowMessage(DateTimeToStr(0 + 1/24 + 1/24/60 + 1/24/60/60));
|
AW: TDate enthält Uhrzeit?
Zitat:
Wenn jemand doch eine Uhrzeit da mit reinpackt, dann hat er Pech. Ein Briefkasten ist ja auch da, um Briefe zu kommen, was aber nicht bedeutet, daß dort niemand stattdessen einen Scheißhaufen reintun könnte. @Bjoerk: :?: Aber verständlicheren und fehlerunanfälligeren Code mag ich auch irgendwie lieber.
Delphi-Quellcode:
ShowMessage(DateTimeToStr(0 + EncodeTime(1, 1, 1, 0));
ShowMessage(DateTimeToStr(0 + 1/HoursPerDay + 1/MinsPerDay + 1/SecsPerDay)); |
AW: TDate enthält Uhrzeit?
Zitat:
Grüße |
AW: TDate enthält Uhrzeit?
Zitat:
|
AW: TDate enthält Uhrzeit?
Zitat:
[edit] Hab zwar ein D1 (war bei meinen 2 D4 dabei), aber hab's nie wirklich benutzt. |
AW: TDate enthält Uhrzeit?
Zitat:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:50 Uhr. |
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 by Thomas Breitkreuz