Zeitabgliech...

[Knotti2005]

Ich würde gern ein Programm schreiben (von mir aus auch eine BAT Datei) Delphi währe aber Schöner um automatisch alle 10 Sekunden die Zeit mit einem Netzwerk Server abzugleichen...

Zitat:

net time \\server /set

Allerdings muss hier noch ein Eingabe erfolgen nämlich J und Enter...

Zitat:

C:\Dokumente und Einstellungen\User>net time \\server /SET
Aktuelle Zeit auf \\server ist 1/7/2006 2:39 PM.

Die aktuelle lokale Zeit ist 1/7/2006 2:26 PM.
Soll die Zeit des lokalen Computers mit
der Zeit auf \\server übereinstimmen? (J/N) [J]: j
Der Befehl wurde erfolgreich ausgeführt.

EDIT: das ist der CMD-Code ohne Ja und Enter Eingabe...

Delphi-Quellcode:

net time \\server /SET /YES

Wir rufe ich den nun von meinem Delphi Programm auf? Und Bekomme die Meldung in meine Delphi FOrm zurück?

[Bernhard Geyer]

Sind nicht bei den Indys oder ICS Komponenten für das zugrundeliegende SNTP-Protokoll.
Oder schau dir mal NetTime an wie es dort gemacht wurde.

[Jelly]

Was macht das denn für einen Sinn, alle 10 Sekunden die Zeit abzugleichen. So falsch gehen die Computeruhren jetzt aber nun auch wieder nicht.

[chaosben]

Zitat:

Zitat von Bernhard Geyer

Sind nicht bei den Indys oder ICS Komponenten für das zugrundeliegende SNTP-Protokoll.

Richtig, da gibt es schon Komponenten dafür. Warum sich also mit der Konsole ärgern, wenn man es viel einfacher machen kann?

[DGL-luke]

man kann das ganze auch in eine batch datei schreiben und dann so aufrufen:

Delphi-Quellcode:

uses Shellapi;

shellexecute(handle, 'open', 'servertime.bat', '',WS_HIDE);

[ManuMF]

Also bei mir müsste der Aufruf so aussehen, damit er funktioniert:

Delphi-Quellcode:

ShellExecute(Application.handle, nil, 'servertime.bat', nil, nil, SW_HIDE);
// Über das 1. nil kann man sich streiten.

Gruß,
ManuMF