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

Вниз

Выключение Timer-а как отследить   Найти похожие ветки 

 
KIE   (2003-04-28 11:10) [0]

На форме есть компонент Timer.
Программно его включаем, он у нас работает секунду а потом отключается автоматически.

Установлен интервал времени 1000.
В теле таймера пишу Timer1.Enabled := FALSE ;

Так вот надо отследить когда он выключится.

Например: Включаем, ждем секунду и потом выполняем какое-либо действие ....


 
Snap   (2003-04-28 11:11) [1]

А выполнять его в таймере что нельзя?


 
jel   (2003-04-28 11:13) [2]

Событие onTimer возникает после истечения установленного интервала времени. Действие в этом случае можно выполнять в обработчике этого события, там же и таймер останавливать.


 
Snap   (2003-04-28 11:17) [3]


> jel © (28.04.03 11:13)

вот вот


 
KIE   (2003-04-28 12:52) [4]

мне надо что бы в теле таймера ничего не было!
Пример

...
Код
...
Timer1.Enabled := TRUE
Ждем пока он вырубится и продолжаем дальше
...


МНЕ НАДО ПРОСТО ДЕЛАТЬ ВРЕМЕННЫЕ ЗАДЕРЖКИ В ПРОГРАММЕ! Может это можно и без таймера сделать?? Если да то как? Старые функции Delay и прочее, что был ов паскале, не работают в дельфи! :(


Как же мне задержку в функции сделать????? :(


 
GROL   (2003-04-28 19:48) [5]

Таймер тебе не поможет.
Используй так:

var
s:longint;
...
s:=GetTickCount;
While (GetTickCount-s)<1000 do
Application.ProcessMessages;


 
DrPass   (2003-04-28 21:37) [6]

Знатоки, блин!
:)
Sleep(<количество миллисекунд>) - WinAPI-функция, эффект тот же, что и у Delay


 
Mop   (2003-04-29 01:45) [7]

2 DrPass ©

вот вот


 
Shirson   (2003-04-29 15:15) [8]

>KIE (28.04.03 12:52)
МНЕ НАДО ПРОСТО ДЕЛАТЬ ВРЕМЕННЫЕ ЗАДЕРЖКИ В ПРОГРАММЕ! Может это можно и без таймера сделать?? Если да то как? Старые функции Delay и прочее, что был ов паскале, не работают в дельфи! :(CODE
Как же мне задержку в функции сделать????? :(


timer1.enabled:=true;
while timer1.enabled do application.ProcessMessages;


Ы? :)



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

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

Наверх





Память: 0.45 MB
Время: 0.005 c
1-34446
Viper_
2003-04-29 04:37
2003.05.12
Image


1-34394
maza
2003-04-28 15:19
2003.05.12
кодирование


14-34561
Style
2003-04-23 18:39
2003.05.12
Delphi Challenge! Пришло письмо с просьбой перенести 1-й тур


3-34344
Evgeny
2003-04-22 12:32
2003.05.12
SQL запрос


11-34379
Kirill
2002-08-02 17:23
2003.05.12
xHelpGen





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