Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.19;
Скачать: CL | DM;

Вниз

Как работает TTimer?   Найти похожие ветки 

 
super_alex   (2003-06-07 14:46) [0]

Мастера помогите... У меня в проге есть громадный цикл. Надо узнать сколько времени он работает. Вроде как надо использовать TTimer... Но как он работает я не знаю... Кстати есть ешо кнопочка "Пауза" - как её приспособить тоже к этому таймеру, то есть, чтобы по нажатии на нёе таймер останавливался, а при старте - опять возобновлялся со значения, полученного при нажатии на Паузу?
Есть ешо и кнопка СТОП - надо сбросить таймер на ноль...
Хелп, очень плиз...


 
Song   (2003-06-07 15:01) [1]

Проверяй системное время.


 
NickBat   (2003-06-07 15:03) [2]

TheTime: TTime;

begin

TheTime:=Time;

for ii:=0 to 1000000
do begin
//your big programm
end;

AllTime:=Time-TheTime;




 
super_alex   (2003-06-07 15:03) [3]

Как?


 
Palladin   (2003-06-07 15:18) [4]

используй GetTickCount


 
super_alex   (2003-06-07 16:04) [5]

господа, нифига не получается....!!!!
А GetTickCount - даёт число секунд с начала старта компа, но не цикла...


 
Song   (2003-06-07 16:07) [6]

Можно занести GetTickCount переменную перед циклом, а потом вычслить пройденное время вычитанием.



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

Текущий архив: 2003.06.19;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.009 c
1-60114
agentru
2003-06-05 22:30
2003.06.19
Создание программы случайных чисел!


3-60072
Kapitan
2003-05-28 16:59
2003.06.19
сообщение: поле ХХХ должно иметь значение


1-60185
Maxim Pshevlotsky
2003-06-05 09:09
2003.06.19
Выгрузка ActiveX Library


3-60029
prihod
2003-05-27 15:52
2003.06.19
??? Как обновлять TDBGrid ???


6-60307
Jaguar
2003-04-08 14:32
2003.06.19
Proxy-сервер, FTP-протокол





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