Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Dilphi и сеть, Помогите, плиззз 
:(
    Опции темы
Underdark
  Дата 30.8.2004, 10:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 70
Регистрация: 12.7.2004
Где: Ульяновск

Репутация: 1
Всего: 2



Очень трудная для меня задача, а для других - не знаю, может легчайшая...

Суть в том, что надо получить системное время с другого компутера, вот и все smile.gif !!!

Помогите, люди, если кто знает как это делается...
PM MAIL   Вверх
YURIC
Дата 30.8.2004, 15:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 161
Регистрация: 5.8.2003

Репутация: нет
Всего: 1



Underdark
посмотри в
Delphi Russian Knowledge Base
from Vit
Version 2.2

я там вроде видел
PM MAIL   Вверх
The MASTER
Дата 30.8.2004, 20:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Old master)
**


Профиль
Группа: Участник
Сообщений: 862
Регистрация: 19.7.2004
Где: Санкт-Петербург

Репутация: 2
Всего: 5



Я не знаю подайдёт ли тебе мой пример, но всё равно вот!

Короче код клиента на компе!
Код

Таймер с интервалом 1 создай!
В нем напиши:
Edit1.text:=TimeToStr(now);
А уже там на кнопку или тоже в таймер уже:
ClientSocket1.socket.sendtext[edit1.text];


А насервере используй ReceiveText! smile.gif
PM MAIL WWW ICQ   Вверх
Underdark
Дата 6.9.2004, 08:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 70
Регистрация: 12.7.2004
Где: Ульяновск

Репутация: 1
Всего: 2



Спасиба, The MASTER,

Я в Delphi Russian Knowledge Base from Vit Version 2.2 нашёл одну подходящую мне вещь.
Она синхронизирует время на двух компутерах:

Код
WinExec('net time \\nts2 /set /yes',SW_HIDE);


Вот только одна проблемка, я не могу разобрать, что указано в параметрах.

Люди помогите, кто в этом разбирается... sad.gif


PM MAIL   Вверх
Underdark
Дата 7.9.2004, 22:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 70
Регистрация: 12.7.2004
Где: Ульяновск

Репутация: 1
Всего: 2



Чё, неужели никто не понимает эту команду и не знает про её параметры? withstupid.gif

Да ни за что не поверю!!!
PM MAIL   Вверх
_hunter
Дата 8.9.2004, 10:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98



а самому справку глянуть? ;)
Цитата
NET TIME
[\\компьютер | /DOMAIN[:домен]| /RTSDOMAIN[:домен]] [/SET]
        [\\компьютер] /QUERYSNTP
        [\\компьютер] /SETSNTP[:список серверов NTP]


P.S.
Работает соответсвенно только под NT


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
Guest
Дата 11.9.2004, 12:21 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Ребяты, Всем СПАСИБА!!!

Всё отлично работает!!! biggrin.gif biggrin.gif biggrin.gif

Кстати,_hunter, для такой команды, оказалось, совсем не обязательно иметь ядро NT.
Всё и так работает.

Ещё одна интересная вещь - программа выполняет команду
Код
WinExec('net time \\Server /set /yes',SW_HIDE);

и работает дальше не дожидаясь ответа от сервера!
Приходится ставить задержку...


  Вверх
_hunter
Дата 11.9.2004, 12:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98



не может она работать wow.gif
служба net только в нтях есть ( или я чего-то пропустил? )

Цитата

Ещё одна интересная вещь - программа выполняет команду
и работает дальше не дожидаясь ответа от сервера!

WinExec не ожидает завершения запущенной программы -- все нормально


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
Underdark
Дата 11.9.2004, 12:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 70
Регистрация: 12.7.2004
Где: Ульяновск

Репутация: 1
Всего: 2



Сто процентов работает под MustDie'98!!! notify.gif
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0543 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.