Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 11.10.2007, 10:07   #1
Roof
Форумчанин
 
Аватар для Roof
 
Регистрация: 01.02.2007
Сообщений: 785
По умолчанию Timer...

как мне сделать чтоб по нажатию кнопки занускался Timer и передавал каждую секунду свое значение в Label? :---)
Изо всей благодати
В руках крепко сжатых
Я донесу только капли
Roof вне форума
Старый 11.10.2007, 10:21   #2
Alex21
With best regards
Участник клуба
 
Регистрация: 20.04.2007
Сообщений: 1,448
По умолчанию

Цитата:
передавал каждую секунду свое значение в Label?
Это которое?
Вот например, вывод времени:
Код:
{запускаем таймер}
procedure TForm1.Button1Click(Sender: TObject);
begin
  Timer1.Interval:=1000; // 1 сек
  Timer1.Enabled:=true;  // запуск таймера
end;
{обработка таймера}
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Label1.Caption:=TimeToStr(Now); //вывод времени
end;
Alex21 вне форума
Старый 11.10.2007, 11:39   #3
Roof
Форумчанин
 
Аватар для Roof
 
Регистрация: 01.02.2007
Сообщений: 785
По умолчанию

неа
мне нужны не часы
а секундомер
сколько секунд прошло от нажатия кнопки - вот!
Изо всей благодати
В руках крепко сжатых
Я донесу только капли
Roof вне форума
Старый 11.10.2007, 11:42   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption:=inttostr(strtoint(L abel1.caption)+1); //вывод времени
end;
I'm learning to live...
Stilet вне форума
Старый 11.10.2007, 11:44   #5
Alex21
With best regards
Участник клуба
 
Регистрация: 20.04.2007
Сообщений: 1,448
По умолчанию

Код:
procedure TForm1.Timer1Timer(Sender: TObject);
var s:integer;
begin
inc(s); //S увеличиваем на 1
  Label1.Caption:=IntToStr(s);
end;
Alex21 вне форума
Старый 11.10.2007, 11:55   #6
Roof
Форумчанин
 
Аватар для Roof
 
Регистрация: 01.02.2007
Сообщений: 785
По умолчанию

2 Alex21
да да да!!! именно это
Изо всей благодати
В руках крепко сжатых
Я донесу только капли
Roof вне форума
Старый 11.10.2007, 11:56   #7
Roof
Форумчанин
 
Аватар для Roof
 
Регистрация: 01.02.2007
Сообщений: 785
По умолчанию

2 Stilet
ошибки выдает, еще попробую, может чего не так понял я
Изо всей благодати
В руках крепко сжатых
Я донесу только капли
Roof вне форума
Старый 11.10.2007, 11:58   #8
Roof
Форумчанин
 
Аватар для Roof
 
Регистрация: 01.02.2007
Сообщений: 785
По умолчанию

спасибо народ!
Изо всей благодати
В руках крепко сжатых
Я донесу только капли
Roof вне форума
Старый 11.10.2007, 11:59   #9
Alex21
With best regards
Участник клуба
 
Регистрация: 20.04.2007
Сообщений: 1,448
По умолчанию

Цитата:
Сообщение от Roof Посмотреть сообщение
2 Stilet
ошибки выдает, еще попробую, может чего не так понял я
Будет работать, если в Label будет записано цифровое значение.
Alex21 вне форума
Старый 11.10.2007, 12:47   #10
Roof
Форумчанин
 
Аватар для Roof
 
Регистрация: 01.02.2007
Сообщений: 785
По умолчанию

ага, я так и понял как раз
Изо всей благодати
В руках крепко сжатых
Я донесу только капли
Roof вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Timer... Teleport Общие вопросы Delphi 13 14.09.2011 17:02
timer ZYRGiX Помощь студентам 3 21.07.2008 15:15
timer и shape гера Помощь студентам 4 16.04.2007 20:14
Timer PAVEL315 Компоненты Delphi 16 20.12.2006 19:47
timer Toxa Компоненты Delphi 6 06.12.2006 06:58