frage zum datum

[raiguen]

Moin

Zitat von Hawkeye219:

Hallo,

auch die von TDateTimePicker.Date gelieferten Werte enthalten einen Zeitanteil, der in diesem Fall mit Trunc() entfernt werden muß.

Gruß Hawkeye

Warum hast du das nicht umgesetzt

Zum Mitmeißeln nochmals deine entsprechend geänderte Abfrage:

Delphi-Quellcode:

if Trunc(form1.DateTimePicker1.Date) = StrToDate('19.11.2006')then 
   form1.edit1.Text:='test'
else 
   form1.Edit1.Text:='nicht das richtige datum';

dann klappt's auch mit dem richtigen Datum

//EDIT: Hawkeye219 war ein millisekündchen schneller...

[KosMottchen]

besten dank an euch alle
es geht und auf euch ist immer verlass

mfg kos

[raiguen]

Zitat von KosMottchen:

oki...

also ich hab das jetzt mal so gemacht..

var
datum1, datum2: TDate;
begin
datum1:=StrToDate('19.11.2006');
datum2:=now;
if datum1 = datum2
then form1.edit1.Text:='test'
else form1.Edit1.Text:='nicht das richtige datum';


geht aba au nicht..

Ist das gleiche Spielchen, was du mit dem DateTimePicker hast: du vergleichst ein 'reines' Datum mit einem Datum, was noch einen Zeitanteil hat.. in diesem Fall datum2! OH sagt zum Now(), dass das aktuelle Systemdatum unddie aktuelle SystemZeit zurückgegeben wird! Somit kann der Datumsvergleich nicht funktionieren!

Zitat von KosMottchen:

.. is vllt so simpel, dass es oben keiner verstanden hatte

Och... ich denke wir haben es schon verstanden, wass du wolltest und Hawkeye219 hat dir ja schon die richtige Lösungsvariante gezeigt! NUR: du hast sie nicht umgesetzt...

[marabu]

Hallo Hawkeye,

Zitat von Hawkeye219:

auch die von TDateTimePicker.Date gelieferten Werte enthalten einen Zeitanteil, der in diesem Fall mit Trunc() entfernt werden muß.

das ist übrigens ein Implementierungsfehler made in Borland - immerhin ist ein eigener Getter vorgesehen.

In dem Zusammenhang ist auch folgendes bemerkenswert ungeschickt:

Borland : TDate (Typ)

... TDate entspricht einem speziellen Typ von TDateTime-Wert ohne Dezimalangaben ...

Nachdenkliche Grüße