Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.11.14;
Скачать: [xml.tar.bz2];

Вниз

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

 
Кот   (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 вся ветка

Форум: "Основная";
Текущий архив: 2004.11.14;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.052 c
1-1099318797
sergvc
2004-11-01 17:19
2004.11.14
Выбор принтера в TWebBrowser


8-1092045694
анонимный
2004-08-09 14:01
2004.11.14
Мало-мальские кины.


4-1096801148
SergeyM
2004-10-03 14:59
2004.11.14
Сообщение в HEX формате


14-1099116614
gn
2004-10-30 10:10
2004.11.14
ИСЛАМСКИЕ ХАКЕРЫ НАСТУПАЮТ


3-1097629887
dark
2004-10-13 05:11
2004.11.14
Как включить поддержку кодировки в таблицу формата *.dbf (dBASE)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский