Вниз
Скачать: CL | DM;

Время   Найти похожие ветки 

 
Кот   (2004-10-29 22:48) [0]

Я недавно начял программировать на Delphi и немогу разобраться, как сделать чтобы время шло  назад, т.е. например : 12:23:11  12:23:10  12:13:09 и так далее, и всё это кнечно же отображаль бы в Edit1. Заранее благлдарен


 
BlackLord2003   (2004-10-29 22:55) [1]

Edit1.Text:=FormatDateTime("hh:mm:ss",time-1);Конечно не совсем то, но, думаю, идея ясна!


 
jack128 ©   (2004-10-29 23:26) [2]

StartTick := GetTickCount;
StartTime := EncodeTime(12, 0, 0, 0);

в событии OnTimer компонента TTimer

Edit1.Text:=FormatDateTime("hh:mm:ss",StartTime - (GetTickCount - StartTick)/1000/60/60/24);


 
Anatoly Podgoretsky ©   (2004-10-30 11:38) [3]

Так вычитать надо, а не прибавлять.


 
DrPass ©   (2004-10-30 11:47) [4]


> как сделать чтобы время шло  назад, т.е. например : 12:23:11
>  12:23:10  12:13:09

Для этого тебе нужно двигаться со скоростью, в два раза превышающей скорость света


 
Кириешки ©   (2004-10-30 11:49) [5]

Timer1.Tag := Timer1.Tag + 1;
Label1.Caption := "До взрыва компьютера осталось : " + IntToStr(100-Timer1.Tag) + " секунд. У вас осталось время чтобы удалиться на безопасное расстояние.";


 
SergP ©   (2004-10-30 19:16) [6]


>  Кот   (29.10.04 22:48)


Бомбу делаешь?



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.022 c
14-1098942290
ИМХО
2004-10-28 09:44
2004.11.14
Рекордная серия Арсенала оборвалась...


1-1098977741
MAVOR
2004-10-28 19:35
2004.11.14
Как обработать текстовый файл


4-1097080582
Hensin
2004-10-06 20:36
2004.11.14
Как просмотреть список запущенных процессов и удалить нужный?


1-1098995456
Khabibulin
2004-10-29 00:30
2004.11.14
Replace System Tray


1-1099415733
Vasya.ru
2004-11-02 20:15
2004.11.14
получить и сложить часы, минуты, секунды, милисекунды




   Наверх