Uhrzeit anzeigen

[passsy]

ich würde gerne einfach die Uhrzeit in nem label anzeigen lassen aber wie komme ich an die?

ich google glaub falsch denn ich finde nix^^


lasst mich raten es is ganz einfach oder?

[TonyR]

Delphi-Quellcode:

labelX.caption:=TimeToStr(now);

...wenn ich mich nicht irre

[Asfaloth]

Datum:

Delphi-Quellcode:

Label1.Caption := DateToStr(Date);

Zeit

Delphi-Quellcode:

Label1.Caption := TimeToStr(Time);

Gruß Asfaloth

[passsy]

@ToniR genau so gehts danke

@Asfaloth das klappt ma nich so ganz^^

[TonyR]

1. Danke für das Danke, aber ich werd' mit Y geschrieben :stupid:
2. Asfaloth meint, dass man dort wo er "time" bzw. "date" hingeschrieben hat man etwas in eben diesem Format reinschreiben soll!!
"Now" ist genau genommen auch nur eine Zahl, die die aktuelle Uhrzeit bzw. das Datum beinhaltet!

[Asfaloth]

Also bei mir gehts so ;)

Kann auch sein das du ne andere Version von Delphi hast wo es mit dem NOW geht.

Gruß Asfaloth

[p0w3r5tr34m3r]

Zitat:

Zitat von Asfaloth

Datum:

Delphi-Quellcode:

Label1 := DateToStr(Date);

Zeit

Delphi-Quellcode:

Label1 := TimeToStr(Time);

Gruß Asfaloth

Was er meint ist

Delphi-Quellcode:

Label1.Caption := DateToStr(now); // 21.01.2007

und

Delphi-Quellcode:

Label1.Caption := TimeToStr(now); // 15:29:xx

Wenn du beides zusammen angezeigt haben möchtest, nutz

Delphi-Quellcode:

Label1.Caption := DateTimeToStr(now); // 21.01.2007 15:29:xx

Mit freundlichen Grüßen
p0w3r5tr34m3r

P.S.
Nutz nächstes Mal doch einfach mal die Foren Suche oder schau mal in die Code-Library :)
Wenn du Tutorials suchst, besuch doch mal die Kollegen vom Delphi - Treff

[Daniel G]

Zitat:

Zitat von TonyR

2. Asfaloth meint, dass man dort wo er "time" bzw. "date" hingeschrieben hat man etwas in eben diesem Format reinschreiben soll!!

In dem Beispiel fehlt schlichtweg ein .Caption :wink:

[TonyR]

aso... na eben, das hab ich ja gleich übersehen....
das hätte man sich aber auch denken können....

[Asfaloth]

so, hab meinen Beitrag ma grad geändert ;)
so müsste es richtig sein :D

[yörsch]

HAI :hi:
versuchs mal mit FormatDateTime

[TonyR]

@ Jörg:
Das Problem dieses Threads war glaub schon mit der ersten Antwort gelöst :zwinker:

[passsy]

hab ich jetzt au gepeilt ^^

ihr hattet beide recht :P


danke noch mals an BEIDE


das mit FormatDateTime hab ich jetzt durchs googlen gefunden und das is exakt das was ich brauch^^


wenn ich euch nich hätt würd ich mich totgooglen^^

[yörsch]

sorry :oops:
wollte eigendlich schreiben der vollständigkeithalber....

[TonyR]

war ja auch richtig, passy hat ja geschrieben, dass es genau das war, nachdem er gesucht hatte (dein Beitrag).... :-D

[blubbermaster]

ich hätte da auch eine Kleine frage ;)

also Code :

Zitat:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
form1.Width:=115;
form1.Height:=80;
label1.Caption:=timetostr(time) + #13 + datetostr(date) ;

end;

procedure TForm1.FormCreate(Sender: TObject);
begin
form1.Color:=transparent;
label1.Font.Color:=cllime;
end;

end.

das ist meine Uhr mir fällt aber immerwieder nicht ein wie ich es verhindere das wenn die Sekunde umspringt es nicht so flackert oder lagt oder ruckelt wie ihr es nennen wollt *xD

Wenn da ma jemand was hat das währe echt genial ^^

[himitsu]

Was meinst du mit Flackern?

Zum Laggen:
Wie schnell läuft dein Timer?

Diesee Timer sind keine Realtime-Timer, also sie sind nicht extrem genau und haben gewissen Ungenauigkeiten, meist abbhängig von der CPU-Auslastung und etwas in minimalen Intervallen von mehrfachen 18ms. kleiner als ~50 liegt die Wahrscheinlichkeit extrem hoch, daß der Timer schnell aus dem Ruder läuft.

Nehmen wir mal an alle "etwa" 1000ms.
Deine Uhrzeit ändert sich alle "genau" 1000.
Und nun kann es passieren, wenn der Timer mal 1001ms braucht, dann wird/könnte schnell mal eine angezeigte "Sekunde" übersprungen werden. :wink:

Timer auf 100, würde die Verzögerung auf "durchschnittlich" 100ms begrenzen, was der Mensch kaum mitbekommt.
> 50-200ms sind, für solche Timer, meist recht passend.

[blubbermaster]

Also mein Timer ist auf einem Intervall von 50 naja ab und an schaut es aus bei der zeit ob es ruckelt oder flackert.

dafür / gegen gibt es einen befhel den man dann in form1 schreiben kann ...

aber welcher genau weiß ich nimmer ;)


aber danke für deinen tip *xD vielleicht kommt noch wer mit der perfekten lösung ;)

[himitsu]

Antiflackern = DoubleBuffered ?

[Luckie]

Bei mir flackert da nichts. Aber warum setzt du im Timer immer wieder die Größe des Formulars?

[blubbermaster]

damit egal wann ich meine .exe ziehe also die größe ändern will das sie in den uhrsprung fällt :D

son bischen naja aber schick ^^

[Luckie]

Und warum wird dann nicht einfach der passende BoderStyle genommen?

[blubbermaster]

borderstyle ?

Meinst du die größe einfach bei form1 hineinschreiben ?

Oder was genau meinst du bin zulange rausgewesen hatte Delphi neulich wieder entdeckt via zufall bei daten sicherrung ^^

da dachte ich hey why not :DDD

[himitsu]

Schau doch einfach mal im OI oder in der OH nach.

Es gibt BorderStyles, welche nicht "sizeable" sind, also nicht größenänderbar ;)

[blubbermaster]

OI ? OH ?

ähm aber die Form woman codet ist doch wenn man F9 macht dann eine .exe
und um zu verhindern das man sie Größer/Kleiner machen darum hab ich die größe im Timer -.-

Weil ich bis jetzt noch nicht weiß wie mans verbessern kann...


ich gehs langsam an ^^ schnegge 2011 :DD

[Luckie]

OI = ObjectInspector, da wo du die Eigenschaften für das Formular einstellst. Weißt du nicht, wozu eine Eigenschaft gut ist, mit dem Mauszeiger anklicken und beherzt und mit etwas Mut F1 drücken. Dann geht die Hilfe (OH) auf zu dem entsprechenden Thema.