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

Вниз

timer   Найти похожие ветки 

 
exo ©   (2003-04-22 18:21) [0]

как запустить таймер по нажатию button?


 
Anatoly Podgoretsky ©   (2003-04-22 18:24) [1]

timer.Enabled := True;


 
Yanis ©   (2003-04-22 18:27) [2]

Извини exo, но ты уж совсем зелёный.


 
Palladin ©   (2003-04-22 18:37) [3]


> Anatoly Podgoretsky © (22.04.03 18:24)

Не работает, пишет ошибку
Undeclared identifier: timer"


 
Yanis ©   (2003-04-22 18:51) [4]

Не timer, а timer1. Чувствуешь разницу?
Вы чё все сговорились или я до конца вопроса не понял.
Таймер запускается так:
Timer1.Enabled:=True;
или
Timer1.enabled:=False;-что бы выключить.


 
Anatoly Podgoretsky ©   (2003-04-22 19:00) [5]

Не знаю, у меня всегда timer, а не timer1


 
Intell ©   (2003-04-22 19:37) [6]

Anatoly Podgoretsky, какой у тебя Delphi? Всегда, помнится, был по умолчанию (если первый) Timer1.


 
Anatoly Podgoretsky ©   (2003-04-22 19:42) [7]

Меня не волнует какой по умолчанию, первое что я делаю, это всегда меняю имя, вне зависимости от версии Дельфи.


 
Yanis ©   (2003-04-22 19:50) [8]

Видимо Palladin не привык к такой хорошой привычке как Anatoly Podgoretsky менять имя(Name) компонента которое стоит по умолчанию.


 
Anatoly Podgoretsky ©   (2003-04-22 20:10) [9]

Есть и исключения, для приморов как правило оставляются имена по умолчанию, что бы жтот пример было легко воссоздать.


 
ferrik ©   (2003-04-22 20:16) [10]

Переключатель timer1.enabled:=not timer1.enabled;
Да так к слову сказано....


 
А   (2003-04-23 04:01) [11]

Удалено модератором


 
Матка   (2003-04-23 05:35) [12]

Бррррррррррр!
Ну народ, базар раздули :))


 
Separator ©   (2003-04-23 06:53) [13]

Так немного в тему :)

procedure TForm1.Button1Click(Sender: TObject);
var ComponentTimer: TComponent;
begin
ComponentTimer:= FindComponent("Timer1");
if ComponentTimer.ClassName = "TTimer" then
with ComponentTimer as TTimer do begin
Interval:= 5000; //5 секунд
Enabled:= True
end
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
ShowMessage("Сработал " + (Sender as TTimer).Name);
Close
end;


 
Palladin ©   (2003-04-23 07:10) [14]


> Yanis © (22.04.03 18:51)

:) какие вы интерсные
Ну ребята...
Автор вопроса не я.
Я просто предположил следующий пост автора.
Смайл забыл поставить.



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

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

Наверх




Память: 0.49 MB
Время: 0.027 c
1-34431
Brain Force
2003-04-28 18:50
2003.05.12
Помогите с MDI


3-34342
T{}r(l-l
2003-04-22 10:57
2003.05.12
Можно ли программно создать Alias?


6-34533
IL-89
2003-03-16 17:26
2003.05.12
Disconnect


6-34537
Winni
2003-03-07 07:37
2003.05.12
Как перехватить щелчок по гипертекстовой ссылке в WebBrowsere?


1-34489
Zilog
2003-04-28 10:37
2003.05.12
Непонятный глюк с TThread.