|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
19.12.2007, 12:58 | #1 |
Пользователь
Регистрация: 04.11.2007
Сообщений: 64
|
таймер
как заставить объект на форме(прогрессбар, например...) работать с таймером(про тот же прогрессбар, чтобы он позишн изменял на каждый отсчет таймера...)
пробовал делать так: with timer1.ontimer(???) do begin сам код; end; не могу понять что прописывать сендером в ontimer... |
19.12.2007, 13:05 | #2 | |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Создай процедуру типа этой:
Цитата:
|
|
19.12.2007, 13:06 | #3 |
Форумчанин
Регистрация: 09.11.2006
Сообщений: 274
|
cделай переменную и при каждом отсщёте таймера
Inc(переменная); ProgressBar.position := переменная
Единственный приличный формат, разработанный Microsoft'ом, - format c:
|
19.12.2007, 13:08 | #4 |
я получил эту роль
Старожил
Регистрация: 25.05.2007
Сообщений: 3,694
|
Тю, дв.клик в инспекторе объектов на событии onTimer, дельфа сама сделает обработчик и поставит курсор между begin/end
а туда написать например так Код:
пыщь
|
19.12.2007, 13:09 | #5 |
Пользователь
Регистрация: 04.11.2007
Сообщений: 64
|
procedure TForm6.Image1MouseEnter(Sender: TObject);
begin timer1.Enabled:=true; timer2.Enabled:=false; with timer1.OnTimer(???Sender: TObject???) do if image1.Width>=500 then timer1.Enabled:=false else begin image1.Width:=image1.Width+i; i:=i+1; end; end; вот кусок кода... к таймеру будут обращаться не один объект,а много...... |
19.12.2007, 13:10 | #6 |
Старожил
Регистрация: 13.12.2006
Сообщений: 3,859
|
бред написали. читайте ответы данные выше
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи |
19.12.2007, 13:12 | #7 |
Пользователь
Регистрация: 04.11.2007
Сообщений: 64
|
кстати.......как я понял, делфийское "inc(переменная);"-это то же самое что и "i++;" в С....да?
|
19.12.2007, 13:16 | #8 |
Старожил
Регистрация: 13.12.2006
Сообщений: 3,859
|
F1 вас не достоин ?
Syntax [Delphi] procedure Inc(var X: Integer); overload; [Delphi] procedure Inc(var X: Integer; N: Integer); overload; Description In Delphi code, Inc adds one or N to the variable X. X is a variable of an ordinal type (including Int64), or a pointer type if the extended syntax is enabled. N is an integer-type expression. X increments by 1, or by N if N is specified; that is, Inc(X) corresponds to the statement X := X + 1, and Inc(X, N) corresponds to the statement X := X + N. On some platforms, Inc may generate optimized code, especially useful in tight loops. If X is a pointer type, it increments X by N times the size of the type pointed to. Thus, given type PMyType = ^TMyType; and var P: PMyType; the statement Inc(P) increments P by SizeOf(TMyType). Warning: You can't use Inc on properties because it modifies the parameter. Note: Inc(S, I) where S is a ShortInt and I is a number greater than 127 will cause an EIntOverFlow exception to be raised if range and overflow checking are on. In Delphi 1.0, this did not raise an exception.
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи |
19.12.2007, 13:16 | #9 |
я получил эту роль
Старожил
Регистрация: 25.05.2007
Сообщений: 3,694
|
Да
inc(i) это i++ inc(i,x) соотвестсвенно i += x
пыщь
|
19.12.2007, 13:16 | #10 |
Пользователь
Регистрация: 04.11.2007
Сообщений: 64
|
а если у меня на форме будет 50 тех же прогрессбаров, то к каждому таймер прикреплять чтоли?
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Таймер | Михаил Юрьевич | Общие вопросы Delphi | 1 | 16.07.2008 08:46 |
Таймер в С# | kommunist | Общие вопросы .NET | 3 | 02.06.2008 12:11 |
таймер | darkcoder | Общие вопросы Delphi | 5 | 06.12.2007 06:14 |
Таймер | Stanislav | Общие вопросы Delphi | 3 | 26.11.2007 06:52 |
Таймер | Blondinko | Помощь студентам | 6 | 23.10.2007 10:35 |