Показать сообщение отдельно
  #20  
Старый 14.08.2012, 11:23
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от osminog
службы запускаються должны с промежутком в 5 секунд! если их сразу вместе запускать = то они висят и не запускаются, поэтому нужно, чтобы стортовала сначала одна служба (получить ответ), затем вторая...
  1. Запускаешь первую службу
  2. Делаешь паузу:
    Код:
    Sleep(5000);
  3. Запускаешь вторую службу

Или так:
  1. Запускаешь первую службу
  2. Включаешь таймер на 5 секунд
    Код:
    Timer1.Interval := 5000;
    Timer1.Enabled := True;
  3. В обработчике события таймера (OnTimer):
    1. Отключаешь таймер:
      Код:
      Timer1.Enabled := False;
    2. Запускаешь вторую службу
Ответить с цитированием