Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Aktuelle Zeit im Fenster laufend anzeigen??? (https://www.delphipraxis.net/69934-aktuelle-zeit-im-fenster-laufend-anzeigen.html)

Pinki 22. Mai 2006 15:02


Aktuelle Zeit im Fenster laufend anzeigen???
 
Hallo,
1. ich wollte mal aktuelle Zeit in einem Fenster anzeigen lassen im Format hh:mm:ss
2. ich möchte dann in der Zeit von 7 bis 18 Uhr TagModus darstellen (Grafik)
und übrige zeit als Nachmodus.
Also ich habe zwei Ereignisse if 07 Uhr< myTime <18 Uhr then ereigniss 1(Tagmodus-Grafik)
else ---ereigniss 2(Nachtmodusgrafik)

Bitte um Vorschläge
MfG :thumb:

fkerber 22. Mai 2006 15:35

Re: Aktuelle Zeit im Fenster laufend anzeigen???
 
Hi!

Dann schau mal in der OH nach Date/Time und dann wirst du da bestimmt fündig.


Ciao Frederic

Der_Unwissende 22. Mai 2006 15:39

Re: Aktuelle Zeit im Fenster laufend anzeigen???
 
Hi,
du wolltest also mal die aktuelle Zeit anzeigen lassen, sehr informativ, aber was genau möchtest du denn wissen? Ich mein klar, hätte auch gerne Vorschläge, falls jmd. zufällig gerade errät was ich mache, bitte schickt sie mir! Danke!

Aber um dir schon mal zu helfen, if und else sind keine Ereignisse. Von Ereignissen spricht man eigentlich nur, wenn irgendetwas passiert (sich ereignet).
Du hast zwei Fälle die du unterscheidest, dass Ereignis ist aber die sekundliche Änderung der Uhrzeit.
Und damit sind wir wieder beim Problem, was ist deine Frage? Woran scheiterts, was klappt? Was schon probiert? ...

Mal ein paar Schlagworte DateTimeToStr(), now, TTimer.

Gruß Der Unwissende

Pinki 22. Mai 2006 15:51

Re: Aktuelle Zeit im Fenster laufend anzeigen???
 
Also
Uhrzeit im Fenster anzeigen und sekundengenau aktualisieren
Schon probiert
Edit2.Text :=FormatDateTime('hh":"nn":"ss', Now);
Jetzt möchte ich die Zeit im Fenster jede Sekunde aktualisieren und anzeigen wie ne Digitale Uhr.


Zu 2.
ich habe mir gedacht so:

myTime:=FormatDateTime('hh":"nn":"ss', Now);
dann Strings vergleichen :if myTime:='18:00:00' then bla bla Tagmodusgrafik
if myTime:='07:00:00' then bla bla Nachtmodusgrafik

freak4fun 22. Mai 2006 15:54

Re: Aktuelle Zeit im Fenster laufend anzeigen???
 
Pack das alles in einen Timer und dann müsste es laufen. ;)

MfG
freak

Pinki 22. Mai 2006 16:00

Re: Aktuelle Zeit im Fenster laufend anzeigen???
 
Schon probiert es klappt wunderbar mit Zeitanzeige und interval 1000ms ertmal
zu 2 muss ich noch gucken.
Danke

fkerber 22. Mai 2006 23:42

Re: Aktuelle Zeit im Fenster laufend anzeigen???
 
Hi!

Zu 2:
Ganz wichtig: Bei if-Abfragen nicht mit dem Zuweisungsoperator ( := ) sondern mit dem Vergleichsoperator ( = ) arbeiten.



Ciao Frederic


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:14 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-2025 by Thomas Breitkreuz