Главная страница
    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.031 c
1-1099041836
Tom
2004-10-29 13:23
2004.11.14
Рисую на форме в Run Time...


14-1098703907
Dimedrol
2004-10-25 15:31
2004.11.14
Windows XP Professional 64-bit Edition


9-1090210160
ASoft
2004-07-19 08:09
2004.11.14
DelphiX-DXImageList


1-1099116369
SSSdd
2004-10-30 10:06
2004.11.14
Как подсчитать время прошедшее между двумя датами?


1-1098877184
Pentium133
2004-10-27 15:39
2004.11.14
А вот проблема с TComboBox





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский