Как циклу отвести заданное время?

[timsoft]

Всем привет!

Задача такая:
1. Посылаем в ком-порт команду.
2. Ждем точно заданное время.
3. Берем из ком-порта ответ.

Код: Выделить всё

function responce(cmd as String, waitSec as single) as String

    sendToCom cmd

    'тут нужен код для точного ожидания waitSec секунд
    'timer не катит, потому что в это время может произойти
    'смена суток и timer сбросится на 0
    'кроме того, в момент ожидания система не должна тупить
    'и тормозить всех и вся :)

    responce = getFromCom

end function


посоветуйте элегантное решение.

[burik]

Ну попробуй функцию Sleep.

[Wolfie]

'timer не катит, потому что в это время может произойти
'смена суток и timer сбросится на 0

А почему бы не сделать объект Timer? и врубать его, а анализировать результат тогда уже в самом Timer1_Timer... Хотя Sleep конечно больше подойдет... но он прожорливый

[Хакер]

Потому что таймер плох при малых Interval-ах. Например при интервале 7.... Будет наверное где то 50.

[ANDLL]

правильный ответ: никак. Точное время в многопоточной операционной системе подождать нельзя.
Ну и второе, а что, sleep точнее таймера?

[VB-constructor]

А чем GetTickCount не устраивает?

[Хакер]

VB-constructor
Конструкция с циклом и GetTickCount будет грузить процессор.

settimer() чем не устраивает?

[VB-constructor]

Конструкция с циклом и GetTickCount будет грузить процессор.

хм, я думал, что так как GetTickCount возвращает значение текущего времени с еачала включения компъютера и фактически ничего не создает, только показывает то, что уже есть...

то, что она грузит комп, сомневаюсь...

settimer() чем не устраивает?

тоже можно, правда на пару строк кода больше будет... но это дело преодолимое

[tyomitch]

А зачем вообще нужна задержка? Просто читать из порта, и всё. Пока туда ничего не пришло, задержка будет сама собой.

[AntonGV]

Вот здесь писали функции задержки, только, имхо, все равно не получится получить точное время задержки.

[timsoft]

А зачем вообще нужна задержка? Просто читать из порта, и всё. Пока туда ничего не пришло, задержка будет сама собой.

дело в том, что на ком-порту висит промышленный счетчик. Я его стартую, жду определенное время и затем считываю его показания. Если прочитать значения раньше или позже, то они будут неточными. Вернее, они будут точными, но время, за которое они насчитались, будет неизвестным

[Viper]

А простым таймером никак? Поставил нужный интервал и считывай показания в событиях.

З.Ы. Объяснение насчет возможной смены суток в применению к таймеру выглядит странно

[timsoft]

А простым таймером никак? Поставил нужный интервал и считывай показания в событиях.

З.Ы. Объяснение насчет возможной смены суток в применению к таймеру выглядит странно

Простым контролом Таймер конечно можно, да только им неудобно отсчитывать интервалы более 65 секунд...

[Viper]

Зацени функцию SetTimer. Диапазона Long думаю хватит

[timsoft]

Спасибо всем

[tyomitch]

Сам-то понял, что сказал?

Какой объект ты ждать собрался?