Return to Unit Services
Description
To be documented
Class definitions
[Expand]
TNTPClient = class(TWinsock2UDPClient)
public
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TMutexHandle;
|
|
|
|
FPollInterval:LongWord;
|
How often to poll the server (in seconds)
|
FPollTimeout:LongWord;
|
How long before receive or send timeout occurs (in milliseconds)
|
FPollRetries:LongWord;
|
How many times to retry a poll
|
|
|
FRetryTimeout:LongWord;
|
How long to wait between poll retries (in milliseconds)
|
|
|
FInitialClockGet:Boolean;
|
Has the time been obtained at least once
|
FInitialClockCount:LongWord;
|
How many times have we tried to obtain the initial clock
|
|
|
FTimerHandle:TTimerHandle;
|
Handle for the NTP update timer
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
|
|
procedure SetPollInterval(APollInterval:LongWord);
|
|
procedure SetPollTimeout(APollTimeout:LongWord);
|
|
procedure SetPollRetries(APollRetries:LongWord);
|
|
|
|
procedure SetRetryTimeout(ARetryTimeout:LongWord);
|
|
|
|
procedure SetInitialClockGet(AInitialClockGet:Boolean);
|
|
procedure SetInitialClockCount(AInitialClockCount:LongWord);
|
|
|
|
procedure SetTimerHandle(ATimerHandle:TTimerHandle);
|
|
public
|
property PollInterval:LongWord read FPollInterval write SetPollInterval;
|
|
property PollTimeout:LongWord read FPollTimeout write SetPollTimeout;
|
|
property PollRetries:LongWord read FPollRetries write SetPollRetries;
|
|
|
|
property RetryTimeout:LongWord read FRetryTimeout write SetRetryTimeout;
|
|
|
|
property InitialClockGet:Boolean read FInitialClockGet write SetInitialClockGet;
|
|
property InitialClockCount:LongWord read FInitialClockCount write SetInitialClockCount;
|
|
|
|
property TimerHandle:TTimerHandle read FTimerHandle write SetTimerHandle;
|
|
|
|
function GetTime:Int64;
|
|
|
|
procedure IncrementInitialClockCount;
|
|
Function declarations
[Expand]
constructor TNTPClient.Create;
Description: To be documented
[Expand]
destructor TNTPClient.Destroy;
Description: To be documented
[Expand]
function TNTPClient.AcquireLock:Boolean;
Description: To be documented
[Expand]
function TNTPClient.ReleaseLock:Boolean;
Description: To be documented
[Expand]
procedure TNTPClient.SetPollInterval(APollInterval:LongWord);
Description: To be documented
[Expand]
procedure TNTPClient.SetPollTimeout(APollTimeout:LongWord);
Description: To be documented
[Expand]
procedure TNTPClient.SetPollRetries(APollRetries:LongWord);
Description: To be documented
[Expand]
procedure TNTPClient.SetRetryTimeout(ARetryTimeout:LongWord);
Description: To be documented
[Expand]
procedure TNTPClient.SetInitialClockGet(AInitialClockGet:Boolean);
Description: To be documented
[Expand]
procedure TNTPClient.SetInitialClockCount(AInitialClockCount:LongWord);
Description: To be documented
[Expand]
procedure TNTPClient.SetTimerHandle(ATimerHandle:TTimerHandle);
Description: To be documented
[Expand]
function TNTPClient.GetTime:Int64;
Description: To be documented
[Expand]
procedure TNTPClient.IncrementInitialClockCount;
Description: To be documented
Return to Unit Reference
