Uhrzeit von AtomUhr herunterladen

[CalganX]

Wer möchte nicht in seinem Programm eine 100% genaue Uhrzeit haben?
Als erstes solltest du eine neue Applikation erstellen. Dann plazierst du einmal NMTime (Register FastNet), einen Timer und ein Label. Dann schreibst du in die FormCreate-Methode folgendes:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject); 
begin 
  Timer1.Interval := 1000; { ein anderer Aktualisierungswert ist natürlich auch möglich... } 
  NMTime1.TimeOut := 2000; 
end;

Dann in die Timer1.OnTimer:

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject); 
var 
  AtomZeit: String; 
begin 
  NMTime1.Host := 'time.nist.gov'; 
  AtomZeit := NMTime1.TimeStr; 
  Label1.Caption := 'Es ist genau '+AtomZeit; 
end;

Natürlich kann man auch diese Informationen so verarbeiten, dass die SystemUhrzeit auf diese AtomZeit eingestellt wird. Das soll hier aber nicht näher beschrieben werden...

posted by Chakotay1308 :wink:

[edit=sakura]PRE durch DELPHI-Tags ersetzt. Mein Gott, war der Beitrag alt :oops: Mfg, sakura[/edit]
[edit=sakura] Mfg, sakura[/edit]

[MathiasSimmack]

Zitat:

Zitat von Chakotay1308

Wer möchte nicht in seinem Programm eine 100% genaue Uhrzeit haben?

Ich ... im Augenblick ... :wink:

Zitat:

´n bissel Text und Code

Habe ich schon mal irgendwo gesehen. Im EDH, glaube ich ... ich will´s nicht beschwören, aber da wären wir wieder beim Thema: Warum Beiträge posten, die es bereits online gibt?

Ja, ich weiß - das Argument ist: die Leute, die hierher kommen, sollen auch hier vieles oder alles finden. Nur -sorry :twisted:!- die Leute, die hier was suchen, kennen auch die anderen Quellen (ich verweise auf mich selbst, als Beweisstück A). Und die anderen werden garantiert nicht den Beitrag lesen, sondern demnächst in einer Sparte die Frage stellen:

"Wie kriege ich eine 100% genaue Atomuhr in mein Programm rein? ... Ach ja, und wie kann ich den Inhalt eines Edits im Label anzeigen?"

Zitat:

Natürlich kann man auch diese Informationen so verarbeiten, dass die SystemUhrzeit auf diese AtomZeit eingestellt wird. Das soll hier aber nicht näher beschrieben werden...

Warum nicht?

[Daniel]

Schön wäre es, diesen Beitrag so weit aufzuarbeiten, dass man einen Code-Schnipsel erhält, der bei Ausführung die Systemzeit neu justiert - und dies auf den derzeit verfügbaren Windows-Plattformen (inkl. Berücksichtigung der Recte etc.)


Grüße,
Daniel

[CalganX]

Gut, werde ich machen, habe aber dieses Thema bsiher immer nur vergeblich gesucht...
Chris

[Daniel]

In diesem Zusammenhang wäre es vielleicht auch interessant, weitere Server einstellen zu können; so zum Beispiel der MS-Server "time.windows.com" (der in den ersten Wochen der Windows XP Auslieferung um 15 Minuten falsch ging).

Nicht, dass ich unter allen Umständen sogar die Uhrzeit von Microsoft beziehen will, aber gelegentlich ist eben der eine oder andere Server nicht erreichbar und dann wäre es eben schön, alternativen zu haben.


Grüße,
Daniel

[CalganX]

Gute Idee, ich werde dazu am besten ein Tutorial schreiben...
Chris

[BrainCode]

Zum Thema Time-Server: Ich vertraue immernoch der Physikalisch Technischen Bundesanstalt, deren Zeit als offiziell definiert ist:

ptbtime1.ptb.de
ptbtime2.ptb.de

[Luckie]

Un dirgendwie hab eich das dumme Gefühl der Beitrag ist in der falschen Sparte. Nur weiß ichn icht wohin, da ich nicht weiß, was das ist oder sein soll? Ein Projekt, dann wäre es richtig, ein Beitrag zur Code-Lib, dann wäre es falsch oder gar ein Tutorial? Aber dazu ist es wohl zu kurz geradten, wäre aber auch falsch.

Und zum Thema: Auf meiner HP gibt es das Programm INet-Time, welches genau das macht, nur ohne Komponenten und mit Source.

[Tim.exe]

Ist das MEZ?
Die Anzeige gibt mir die aktuelle Uhrzeit minus 2 Std zurück, also anstatt 12:54:10 -> 10:54:10

[CalganX]

Hi,
dann musst du dir einen anderen Server raussuchen. ;) Oder einfach zwei Stunden drauf addieren. :)

Chris

[Tim.exe]

Hmm wie find ich den nen deutschen Server bzw. die Adresse?

[Sharky]

Zitat:

Zitat von Tim.exe

Ist das MEZ?
Die Anzeige gibt mir die aktuelle Uhrzeit minus 2 Std zurück, also anstatt 12:54:10 -> 10:54:10

Ist doch die richtige Zeit.

Du musst bei der Anzeige deine Zeitzone und die Sommerzeit berücksichtigen.

IMHO geben alle Time-Server die UTC-Zeit raus.

[negaH]

Zitat:

IMHO geben alle Time-Server die UTC-Zeit raus.

Dies stimmt so nicht. Es gibt Server die ihre lokale Zeit versenden. Zudem hängt dies stark vom verwendeten Protokoll ab.


Gruß Hagen

[Wormid]

Nur mal so als Anmerkung: Ich rate dringend davon ab, die Uhrzeit jede Sekunde einmal per Internet abzufragen.
Erstens erzeugt das regeläßig Datenverkehr (es soll noch Leute ohne Flatrate geben...), zweitens finden die Serverbetreiber das bestimmt auch nicht übermäßig prall...

Was das setzen der Systemzeit angeht, so fände ich das aus Usersicht auch nicht so toll, wenn irgendwelche Software meine Uhr ungefragt stellen würde. Aufjedenfall Optionen für die Zeitzonen, Zeitserver und aktualiesierungsintervalle einbauen, wenn denn unbedingt die Zeit aus dem I-Net kommen muss.

Gruß

Wormid

[The-X]

HI,
meines Wissens kann man die Zeitzone durch Api-Calls rausfinden...
weis nur atm nich wie ... GetSystemTimeinfo ? oder so

und ausserdem kann man bei winXp doch auch den Zeitserver angeben, oder nicht ?

[Alexander]

Ich frage mich gerade, warum der Thread nicht in der Code-Lib ist und nicht hier....sollte man vielleicht dahin verschieben.
Zumndest den Beitrag von Chris.

[CalganX]

Hi,
NEIN! Wenn das gewünscht wird, dann überarbeite ich den noch und übertrage ihn auf die Indys.

Chris

[flomei]

Nette Sache. Ich wollte mich heute abend auch mal damit beschäftigen aber was ist das für eine Komponente mit der die Zeit da ermittelt wird bzw. welche Indy-Komponente erfüllt den gleichen Zweck?

Danke im Vorraus!

MfG Florian :hi:

[Luckie]

Dazu braucht man keine Komponente. Siehe mein INetTime auf meiner HP.

[CalganX]

Hi,
ich habe das da mit Hilfe der Fastnet-Komponenten gemacht. Aus dem Grund, dass ich damals noch nicht viel Ahnung hatte. ;)

Chris

[flomei]

Aha...
Werd mal gucken. Nur ist da halt noch dieses Rechteproblem das ich mit Luckie schon im Chat besprochen habe... :roll:

MfG Florian :hi:

[Luckie]

Und wir sind beide übereingekommen, dass es keinen Sinn macht, wenn jeder Gast an der Systemzeit rumdrehen kann. Also, wo ist da das Problem?