В блоке инициализации прописываешь
delphi Код:
crashz:=TTimer.Create(nil); //- создание таймера
crashz.OnTimer:=@crash1;//- объявление процедуры выполняемой при срабатывании таймера
crashz.enabled:=false;//- исходное состояние таймера
crashz.interval:=5000;//- интервал срабатывания в мс
после этого создаешь нужную процедуру, и управляешь в скрипте ее включением\выключением флагом crashz.enabled (crashz - условное название, может быть любым)
__________________
На фразы в аську типа "слух карочь 1)как точить 2)как раскачаться за 5 мин" - игнор. ИМХО идиотизм
Дай голодному рыбу - он будет один день сыт. Покажи ему, как удить рыбу - он пошлёт тебя и скажет, что у него есть более интересные занятия, чем забрасывать снасти в воду
David Kastrup @ de.comp.text.tex.
"Приобретенные навыки общения с маленькими детьми - сильно упрощают взаимопонимание на форумах..."
А вы знаете, что для качественной сварки - место шва нужно протереть спиртом?
|