Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Datum : Datum vom vorherigen Tag ermitteln (https://www.delphipraxis.net/5274-datum-datum-vom-vorherigen-tag-ermitteln.html)

1PM 30. Mai 2003 18:23


Datum : Datum vom vorherigen Tag ermitteln
 
Hallo!

Wie kann ich den Tag zuvor von Date ermitteln? Gibt es einen Befehl?

Vielen Dank im vorraus!

Gruß 1PM

Christian Seehase 30. Mai 2003 18:47

Moin 1PM,

wenn Du Dir man den Datentyp TDateTime genauer anschaust, wirst Du feststellen könne, dass es sich hierbei nur um einen Double Wert handelt, bei dem die Vorkommastellen die Tage betreffen, und die Nachkommastellen die Tageszeit.

Delphi-Quellcode:
ShowMessage(DateToStr(now-1));
gibt Dir, demzufolge, den Vortag des aktuellen Datums aus

1PM 30. Mai 2003 19:13

Danke für den Tip!

Es handelt sich hierbei um einen Vergleich mit calendar.Date!

Allerdings fkt. der Vergleich mit
Delphi-Quellcode:
if (calendar.date=now-1)
nicht!

Stanlay Hanks 30. Mai 2003 19:21

Du meinst, du hast eine Kalender Komponente, oder?

1PM 30. Mai 2003 19:23

ja genau!

APP 30. Mai 2003 19:29

Hallo
Delphi-Quellcode:
MonthCalendar1.Date := (date-1);
funkt bei mir...

[EDIT]
Delphi-Quellcode:
MonthCalendar1.Date := (now-1);
aber auch...
mit dem eingebauten TMonthCalendar von Delphi
[/EDIT]

1PM 30. Mai 2003 19:33

Delphi-Quellcode:
if (calendar.Date>date) and (calendar.date<(now-1))
Fkt. mit dem Calendar bei mir nicht!

APP 30. Mai 2003 19:42

Hallo,
aber wie kann
Code:
wenn (DeinDatum > Heute) UND (DeinDatum < Gestern)
ein Datum zugleich größer als heute und kleiner als gestern sein?

1PM 30. Mai 2003 19:44

Damit kann nur der Tag heute und gestern ausgewählt werden! (im Else-Block)

Stanlay Hanks 30. Mai 2003 19:49

Dann musst du aber OR nehmen und nicht AND.


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:16 Uhr.
Seite 1 von 3  1 23      

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