Вниз
Скачать: 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.035 c
4-1097041381
Суслик
2004-10-06 09:43
2004.11.14
Шрифт


1-1098875302
Pentium133
2004-10-27 15:08
2004.11.14
TListBox...


10-1062767704
karan
2003-09-05 17:15
2004.11.14
Общие вопросы по DCOM


10-1063603897
Dred2k
2003-09-15 09:31
2004.11.14
Delphi7, COM-сервер и Windows98 - странное творится


3-1097215384
janb
2004-10-08 10:03
2004.11.14
Помогите начинающему подключится к локальной базе MySQL




   Наверх