Forum: Programmieren allgemein
by MicMic,
14. Sep 2018
In der Funktion "CompareDates" wird genau das gemacht, was ich angesprochen habe, sprich laut Hilfe (diese eine Anmerkung) soll man die Vergleichsprüfung nicht so machen.
Trotzdem Danke @KodeZwerg für's raussuchen.
Michael
Forum: Programmieren allgemein
by MicMic,
13. Sep 2018
Ich bin nun gerade dabei mit diesem TTime/TimeOf und TDate/DateOf
Da ich hier ja dann mit ...:
Var D1,D2 : TDate;
D1 := DateOf(FileTimeToDateTime(Datum1 aus FindData.ftCreationTime));
D2 := DateOf(FileTimeToDateTime(Datum2 aus FindData.ftCreationTime));
If D1 < D2 then ... // kleiner
else if D1 > D2 then ... // größer
Forum: Programmieren allgemein
by MicMic,
13. Sep 2018
Ok, Danke für die Hilfe
Ich probiere es heut Abend dann mal aus.
Michael
Forum: Programmieren allgemein
by MicMic,
13. Sep 2018
Hilft Dir sowas bei Deinem Vorhaben?
uses DateUtils;
...
var
Time: TTime;
Date: TDate;
Time := TimeOf(EinDateTime);
Forum: Programmieren allgemein
by MicMic,
13. Sep 2018
Ihr bringt mich ganz durcheinander :)
Also ich hole mir die Datums/Zeit Werte von TWIN32FindDataW und TWin32FindData.
Das ist ja dann _FILETIME 64 Bit. Wusste nicht, dass es ein altes DOS FILETIME gibt.
Bei den normalen Vergleichs-Funktionen ist mir nicht klar, was die genau machen wenn man nur nach Datum sucht (nicht nach Uhrzeit) oder nur nach Uhrzeit (nicht nach Datum). Deshalb dachte...
Forum: Programmieren allgemein
by MicMic,
12. Sep 2018
Hallo,
FILETIME, TDateTime, Timestamp...
Meine Quelle ist jedenfalls FILETIME.
Ich möchte 2 Datumswerte vergleichen, mal 2 Datum+Uhrzeit Angaben und nur mal nach 2 Uhrzeiten.
Also welche dann größer oder kleiner ist.
Da wäre es doch einfacher wenn man folgendes macht.
Die Zeitangabe in Int64 umzuwandeln.