<div>
Try this function.<br />
<br />
<br />
procedure TForm1.Button1Click(Sender<wbr />: TObject);<br />
begin<br />
label1.caption:=GetsystemT<wbr />imeUtc()<br />
end;<br />
<br />
<br />
function GetSystemTimeUTC : String;<br />
var<br />
&nbsp; &nbsp;stSystemTime : TSystemTime;<br />
begin<br />
&nbsp; &nbsp;Windows.GetSystemTime( stSystemTime );<br />
&nbsp; &nbsp;Result := DateTimeToStr( SystemTimeToDateTime( stSystemTime ) );<br />
end; <br />
<br />

</div>


Try this function.


procedure TForm1.Button1Click(Sender: TObject);
begin
label1.caption:=GetsystemTimeUtc()
end;


function GetSystemTimeUTC : String;
var
   stSystemTime : TSystemTime;
begin
   Windows.GetSystemTime( stSystemTime );
   Result := DateTimeToStr( SystemTimeToDateTime( stSystemTime ) );
end;



<div>
Not quite. &nbsp;I want to SET the time.<br />
<br />
Don
</div>


Not quite.  I want to SET the time.

Don

<div>
<div class="content wysiwyg-content">
I'm writing a network app and I need to sychronize the system times on all the nodes with the server.<br />
<br />
All I really need is the source code to set the system Date/Time locally.<br />
<br />
Don
</div>
</div>


I'm writing a network app and I need to sychronize the system times on all the nodes with the server.

All I really need is the source code to set the system Date/Time locally.

Don

System Time

Delphi is the most powerful Object Pascal IDE and component library for cross-platform Native App Development with flexible Cloud services and broad IoT connectivity. It provides powerful VCL controls for Windows 10 and enables FMX development for Windows, Mac and Mobile. Delphi is your choice for ultrafast Enterprise Strong Development™. Look for increased memory for large projects, extended multi-monitor support, improved Object Inspector and much more. Delphi is 5x faster for development and deployment across multiple desktop, mobile, cloud and database platforms including 32-bit and 64-bit Windows 10.