ТАймер

← →
ArchValentin (2004-09-21 01:55) [0]

Пацаны, помогите pls, как сдалать таймер обратного отсчёта? (задаю 3 часа, и он попёр: 02:59, 02:58, 02:57.......)

← →
VAmpiro$ (2004-09-21 02:09) [1]

НУ в натуре не даю дупля.... пацан! :))

← →
GuAV © (2004-09-21 02:40) [2]

TTimer
в событии OnTimer - декремент счётчика и вывод его текущего значения. пока оно не 0.

← →
ArchValentin (2004-09-21 17:07) [3]

Не понял :( поясните pls.

← →
jack128 © (2004-09-21 17:09) [4]

ArchValentin (21.09.04 17:07) [3]
декримент = уменьшение на единицу

← →
Anatoly Podgoretsky © (2004-09-21 17:12) [5]

Отнимать надо от трех часов по единичке, но лучше от (Time+3 часа) - Time

← →
GuAV © (2004-09-21 21:57) [6]

> Отнимать надо от трех часов по единичке

> (задаю 3 часа, и он попёр: 02:59, 02:58, 02:57.......)

от 3*60 минут по минуте.

но если нужно без вывода промежуточных результатов, то сразу задать ему 3*60*60*1000

с TDateTime работать не рекомендую, т.к. это число с плавающей точкой, может одна минута в нём представлена с большой погрешностью, лучше целый тип.

← →
Mim1 © (2004-09-22 16:24) [7]

А после установки говорил "The bomb has been plained"? :)

← →
ArchValentin (2004-09-29 01:50) [8]

...а потом АлахАбар :))) спасиба...

← →
ArchValentin (2004-09-29 01:53) [9]

Ну всё бы хорошо,1) а если нужно с выводом результата
2) мне нужно вести отчёт по работе комп. салонов, а если у меня 50 компов? это чё 50 TTimer?

← →
Германн © (2004-09-29 02:26) [10]

2 ArchValentin (29.09.04 01:53) [9]
Ну все бы ничего!
Но ты "ведешь отчёт по работе комп. салонов"!
75% мои, и решу все твои проблемы! :))

← →
Defunct © (2004-09-29 05:35) [11]

> с TDateTime работать не рекомендую, т.к. это число с плавающей точкой, может одна минута в нём представлена с большой погрешностью, лучше целый тип.

Откуда такие сведения?

TDateTime хранит текущую дату/время с точностю до 1/1000 сек.

← →
Dmy (2004-09-29 08:43) [12]

Это если хранить число такое мелкое 1/1000 сек. А если хранить число 3 часа 3 минуты 3/1000 сек, то тоже будет такая же точность? Что-то не вериться....

← →
Рамиль © (2004-09-29 08:50) [13]

Dmy (29.09.04 8:43) [12]
Точность не изменится. Хоть 3000 лет 3 года 3 часа 3 минуты 3/1000 сек храни.

← →
Digitman © (2004-09-29 09:00) [14]

> 1) а если нужно с выводом результата

ну и выводи себе "результат" на здоровье, прямо тут же, в обработчике OnTimer

> 2) мне нужно вести отчёт по работе комп. салонов, а если
> у меня 50 компов? это чё 50 TTimer?

а не думаешь ли ты, что не "по-пацански" не объяснять толком, где, как и при каких условиях должна работать программа ? то ли на каждом из "50 компов", то ли на каком-то одном из них, выполняющем роль станции администратора салона, легендарной персоны с именем АлахАбар ...

← →
GuAV © (2004-09-29 14:25) [15]

> Откуда такие сведения?

Я написал может. Тут предлагают прибавлять эту самую приблизительно одну минуту, за много прибавлений набежит достаточно.

Рамиль © (29.09.04 08:50) [13]
А может там где 3000 лет милисекунд уже не будет ?

← →
Dmy (2004-09-29 18:45) [16]

Проверил. 1 секунда храниться нормально, а вот 1 тысячная секунды - уже не нормально. Проверял так - поставил баттон и эдит и написал такой незамысловатый код:

procedure TForm1.Button1Click(Sender: TObject); const //стянуто с "советов по дельфи" %) Second = 1000/MSecsPerDay; var dt: TDateTime; begin dt := StrToDate("10.10.5000"); dt := dt + (Second * 10){ + (3 * MSecsPerDay)}; //если раскомментировать - будут глюки Edit1.Text := FormatDateTime("d mmm yyyy, hh:nn:ss:zzz", dt); end;

Рамиль © (29.09.04 8:50) [13]
Точность не изменится. Хоть 3000 лет 3 года 3 часа 3 минуты 3/1000 сек храни.
Относительная не измениться. А вот абсолютная ;-) Вот тут то мы и потеряем на три тысячных..

← →
ArchValentin (2004-10-04 17:32) [18]

Спасиба, конечно, за дискуссию на мою тему, но хоть кто нить поделился бы исходничком :(
А что непонятного в проблемме, я сам не понял, обычный "локер" управление комп. салоном. На серваке считаю время, когда пора выключать другие компы...

← →
Drakosha (2004-10-04 17:43) [19]

а какя разница в которую сторону считает таймер?
нужно выключить через 3 минуты вот и ставь таймер на 3 минуты.
а вот пользователю уже показывай (3 минуты - прошедшее время).

В чём проблема то?

> Спасиба, конечно, за дискуссию на мою тему, но хоть кто
> нить поделился бы исходничком :(

$50 и я сделаю тебе красивый (по твоему дизайну) таймер обратного отсчета. Плюсы - за особые требования к дизайну.

← →
ArchValentin (2004-10-07 13:31) [21]

Народ, по-любому, кто-то когда-то пытался собрать подобную прогу, поделитесь своими успехами... очень надо, конференция горит, ничё не успеваю...

ТАймер Найти похожие ветки