Hola eroblesh.
Si querés sincronizar la hora del equipo con la del servidor, para luego usar la sentencia de tu último mensaje, sería:
Código Delphi
[-]
procedure TForm1.btnSyncClick(Sender: TObject);
begin
ShellExecute(Handle, 'open', 'NET', 'TIME \\NOMBRE_DEL_SERVIDOR /SET /Y', nil, SW_HIDE);
end;
Saludos.