|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
02.07.2013, 18:16 | #1 |
Пользователь
Регистрация: 27.06.2013
Сообщений: 10
|
Работа с таймером (Lazarus)
Здравствуйте.
Помогите пожалуйста, нужно что бы в метку выводилось число срабатывания таймера (всего срабатываний 10), что бы после каждого срабатывания числом менялось, а оно сразу выводит в метку число 10. Код HTML:
procedure TForm1.Button1Click(Sender: TObject); var n,i:integer; begin n:=StrToint(Edit1.Text); Timer1.Interval:=(n*1000); for i:=0 to 9 do begin Timer1.Enabled:=True; Lbl.Caption:=IntToStr(i+1); end; Timer1.Enabled:=false; end; |
02.07.2013, 18:40 | #2 |
МегаМодератор
СуперМодератор
Регистрация: 09.11.2010
Сообщений: 7,341
|
Код:
Пожалуйста
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
Последний раз редактировалось BDA; 02.07.2013 в 18:57. |
02.07.2013, 18:48 | #3 |
Пользователь
Регистрация: 27.06.2013
Сообщений: 10
|
Спасибо огромное!
Всё работает! |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Работа с таймером С# | JK0 | Помощь студентам | 1 | 31.10.2011 16:25 |
работа с таймером | Андрей.12 | Помощь студентам | 3 | 28.03.2010 22:36 |
Работа с таймером | LordTor | Общие вопросы Delphi | 1 | 09.11.2009 14:08 |
Работа с таймером | Alika | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 2 | 12.11.2007 19:27 |