Class TSNTPSend

Unit

sntpsend

Declaration

type TSNTPSend = class(TSynaClient)

Description

Implementation of NTP and SNTP client protocol

, include time synchronisation. It can send NTP or SNTP time queries, or it can receive NTP broadcasts too.

Note: Are you missing properties for specify server address and port? Look to parent TSynaClient too!

Hierarchy

• TObject
• TSynaClient
• TSNTPSend

Overview

Methods

	constructor Create;
	destructor Destroy; override;
	function DecodeTs(Nsec, Nfrac: Longint): TDateTime;
	procedure EncodeTs(dt: TDateTime; var Nsec, Nfrac: Longint);
	function GetSNTP: Boolean;
	function GetNTP: Boolean;
	function GetBroadcastNTP: Boolean;

Properties

	property NTPReply: TNtp read FNTPReply;
	property NTPTime: TDateTime read FNTPTime;
	property NTPOffset: Double read FNTPOffset;
	property NTPDelay: Double read FNTPDelay;
	property MaxSyncDiff: double read FMaxSyncDiff write FMaxSyncDiff;
	property SyncTime: Boolean read FSyncTime write FSyncTime;
	property Sock: TUDPBlockSocket read FSock;

Description

Methods

constructor Create;

destructor Destroy; override;

function DecodeTs(Nsec, Nfrac: Longint): TDateTime;

Decode 128 bit timestamp used in NTP packet to TDateTime type.

procedure EncodeTs(dt: TDateTime; var Nsec, Nfrac: Longint);

Decode TDateTime type to 128 bit timestamp used in NTP packet.

function GetSNTP: Boolean;

Send request to TSynaClient.TargetHost and wait for reply. If all is OK, then result is True and NTPReply and NTPTime are valid.

function GetNTP: Boolean;

Send request to TSynaClient.TargetHost and wait for reply. If all is OK, then result is True and NTPReply and NTPTime are valid. Result time is after all needed corrections.

function GetBroadcastNTP: Boolean;

Wait for broadcast NTP packet. If all OK, result is True and NTPReply and NTPTime are valid.

Properties

property NTPReply: TNtp read FNTPReply;

Holds last received NTP packet.

property NTPTime: TDateTime read FNTPTime;

Date and time of remote NTP or SNTP server. (UTC time!!!)

property NTPOffset: Double read FNTPOffset;

Offset between your computer and remote NTP or SNTP server.

property NTPDelay: Double read FNTPDelay;

Delay between your computer and remote NTP or SNTP server.

property MaxSyncDiff: double read FMaxSyncDiff write FMaxSyncDiff;

Define allowed maximum difference between your time and remote time for synchronising time. If difference is bigger, your system time is not changed!

property SyncTime: Boolean read FSyncTime write FSyncTime;

If True, after successfull getting time is local computer clock synchronised to given time. For synchronising time you must have proper rights! (Usually Administrator)

property Sock: TUDPBlockSocket read FSock;

Socket object used for TCP/IP operation. Good for seting OnStatus hook, etc.