Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.10.30;
Скачать: [xml.tar.bz2];

Вниз

Как получить время с сервера?   Найти похожие ветки 

 
Иванов__   (2005-10-05 12:07) [0]

Какие нужны компоненты и если можно примерчик. Заранее спасибо.


 
clickmaker ©   (2005-10-05 12:43) [1]

с какого сервера?


 
Иванов__   (2005-10-05 13:17) [2]

Есть комп. с Win2000 на котором есть стандартный сервер времени на 37 порте. Нужно с него получить время.


 
clickmaker ©   (2005-10-05 14:10) [3]

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/randz/protocol/client_sntp_request.asp

Есть ли готовые функции или компоненты - не уверен. Поищи по ключевым словам NTP, server time


 
Leonid Troyanovsky ©   (2005-10-05 14:18) [4]


> Иванов__   (05.10.05 12:07)  
> Какие нужны компоненты и если можно примерчик. Заранее спасибо.
>


http://groups.google.com/group/fido7.ru.delphi/msg/c7d4f67c8d1d3ce1

--
Regards, LVT.


 
Alexander Panov ©   (2005-10-05 14:23) [5]

program SetTime;
uses
 Windows, SysUtils, IdTime;

var
 CurrTime: TDateTime;
 st: TSystemTime;
 YY,MM,DD,HH,NN,SS,MS: Word;
begin
   try
     with tIdTime.Create(nil) do
     begin
//        Host := "ntps1-0.uni-erlangen.de";
       Host := "192.168.0.1";
       try
         CurrTime := DateTime;
       except
       end;
       Free;
     end;
   except
     Exit;
   end;
   GetLocalTime(st);
   DecodeDate(CurrTime,YY,MM,DD);
   DecodeTime(CurrTime,HH,NN,SS,MS);
   st.wYear := YY;
   st.wMonth := MM;
   st.wDay := DD;
   st.wHour := HH;
   st.wMinute := NN;
   st.wSecond := SS;
   st.wMilliseconds := MS;
   SetLocalTime(st);
end.


 
Иванов__   (2005-10-05 15:08) [6]

Ошибка "Сокет еррор". Че деять?


 
DiamondShark ©   (2005-10-05 15:23) [7]


> Ошибка "Сокет еррор". Че деять?

Как минимум, сообщить код ошибки.


 
Иванов__   (2005-10-05 16:44) [8]

Код 11004


 
Leonid Troyanovsky ©   (2005-10-05 17:21) [9]


> Иванов__   (05.10.05 16:44) [8]
> Код 11004


Скорее всего, оный хост выключен, или, просто, неправильно обозван.

--
Regards, LVT.


 
Leonid Troyanovsky ©   (2005-10-05 17:42) [10]


> Иванов__   (05.10.05 13:17) [2]
> Есть комп. с Win2000 на котором есть стандартный сервер
> времени на 37 порте.


А что есть "стандартный сервер времени" для Win2K?
И, чего, он, в самом деле, на 37 порту?

--
Regards, LVT.



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2005.10.30;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.069 c
14-1128867441
Vudu
2005-10-09 18:17
2005.10.30
Ктонибудь пробовал продовать программы в plati.ru


3-1126863221
REP
2005-09-16 13:33
2005.10.30
Задать триггер на ограничение количества записей


3-1126802690
Patrick
2005-09-15 20:44
2005.10.30
Компонент Delphi для построения SQL - запросов к DBF-файлам.


11-1109622953
Boguslaw Brandys
2005-02-28 23:35
2005.10.30
KOL and Memcheck ?


14-1128886489
Bogdan1024
2005-10-09 23:34
2005.10.30
КМП будет или нет?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский