Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Datum bekommen aber wie! (https://www.delphipraxis.net/144370-datum-bekommen-aber-wie.html)

jonsen2.0.0.9 6. Dez 2009 11:02


Datum bekommen aber wie!
 
Hallo,

so hab volgendes Problem bei dem ihr mir hoffentlich weiter helfen könnt.

Ich möchte unten in der Ecke bei meinem Programm das Datum...die Uhrzeit hab ich schon.

Wie kann ich hier das datum bekommen? Ausgeben geht ja mit
Delphi-Quellcode:
Label2.caption:=DateToStr()
aber wie Bekommt man das datum?

und wie kann ich das so formatieren das ich nur tag und monat z.B. in einer if bedingung vergleichen kann:

Delphi-Quellcode:
if ???=24.12 then
       Label3.caption:='Frohe weihnachten'
so was z.B.

wäre toll wenn ihr mir da helfen könnt!


DANKE SCHON MAL

Matze 6. Dez 2009 11:05

Re: Datum bekommen aber wie!
 
Hallo,

das Datum erhälst du genauso wie die Zeit:

Delphi-Quellcode:
DateToStr(Now) // Zeit: TimeToStr(Now)
Zum Zerlegen der Zahlen kannst du dir Delphi-Referenz durchsuchenDecodeDateTime bzw. Delphi-Referenz durchsuchenEncodeDateTime ansehen.

Grüße, Matze

himitsu 6. Dez 2009 11:06

Re: Datum bekommen aber wie!
 
z.B. mit Delphi-Referenz durchsuchenDecodeDate oder Delphi-Referenz durchsuchenFormatDateTime

jonsen2.0.0.9 6. Dez 2009 11:37

Re: Datum bekommen aber wie!
 
sorry geht iwi net:

Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
Var i:TDateTime;
begin
i:=GetTime ;
Label1.Caption:=TimeToStr(i);
Label2.Caption:=DateToStr(i);
end;
so sieht der code aus und das datum is 30.12.1899 also irgendwie falsch...meine uhr am pc is richtig und zeitzne is richtig eingestellt....


und auf der seite ist fürs formatieren d und m aber da steht immer :

[Fehler] Unit1.pas(99): Undefinierter Bezeichner: 'd'

Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
Var i:TDateTime;
begin
i:=GetTime;
Label3.caption:=formatdatetime(d:m,i);
end;

patti 6. Dez 2009 11:39

Re: Datum bekommen aber wie!
 
Nimm doch statt GetTime einfach Now, so wie es oben bereits berschrieben wurde.

haentschman 6. Dez 2009 11:40

Re: Datum bekommen aber wie!
 
versuch mal i:= Now

:evil: zu spät

Jens Hartmann 6. Dez 2009 11:43

Re: Datum bekommen aber wie!
 
Hallo,

so müsste es funktionieren..

Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption:=TimeToStr(Now);
Label2.Caption:=DateToStr(Now);
end;
Gruß Jens

jonsen2.0.0.9 6. Dez 2009 11:44

Re: Datum bekommen aber wie!
 
d weiss der nich was dat is...(siehe oben im beitrag)

auch da steht iwi immer 30.12.1899 WIESO?

himitsu 6. Dez 2009 11:52

Re: Datum bekommen aber wie!
 
Zitat:

Zitat von jonsen2.0.0.9
d weiss der nich was dat is...(siehe oben im beitrag)

Dieses ist ein Stringparameter, also gib deinen Format-String auch als String an.


Zitat:

Zitat von jonsen2.0.0.9
auch da steht iwi immer 30.12.1899 WIESO?

Ließ mal in der OH nach, was da zu TimeToStr und DateToStr steht.
Diese geben das DAtum oder die Zeit in dem Format an, welches für das System (in Windows) eingestellt ist.

haentschman 6. Dez 2009 12:17

Re: Datum bekommen aber wie!
 
OT:

iwi :gruebel:

man macht sich ja schlau :zwinker:
http://de.wikipedia.org/wiki/iwi

[ironie aus]


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:59 Uhr.
Seite 1 von 2  1 2      

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