Регистрация Главная Сообщество
Сообщения за день Справка Регистрация

С циклом

-

Вопросы и ответы, обсуждения

- Ваши вопросы по Pascal/Delphi только в данном разделе

Ответ
 
Опции темы
Старый 27.10.2011, 22:50   #1
Читер-спонсор
 Сержант
Аватар для gum_classis
 
gum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядом
Регистрация: 03.04.2011
Сообщений: 128
Популярность: 5379
Сказал(а) спасибо: 137
Поблагодарили 209 раз(а) в 111 сообщениях
Отправить сообщение для gum_classis с помощью ICQ Отправить сообщение для gum_classis с помощью Skype™
 
Smile С циклом

Вот у меня такой вопрос как в цикле While сделать задержку вот пример кода
Цитата:
var a:integer;
begin
a:=1
while a<>100 do
begin
a=a+1;
Label1.caption:=intTostr(a);
end;
end;

Этот код в каждый круг цикла должен переменной а добавлять +1 так прога это и делает вот только мгновенно так вот как сделать чтобы прога добавляла постепенно.
Возможно ли это сделать через цикл "While"
________________
DO:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
WF:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
  Ответить с цитированием
Старый 27.10.2011, 23:05   #2
NoItemName
 Рыцарь
Аватар для J-Fobos
 
J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(
Регистрация: 12.04.2009
Сообщений: 394
Популярность: 47903
Сказал(а) спасибо: 515
Поблагодарили 1,124 раз(а) в 430 сообщениях
 
По умолчанию Re: С циклом

вставить в цикл sleep (1000), но если такое делать в главном потоке, то он будет останавливать всю прогу, будет выглядеть что программа подвисает.

зы: 1000 = 1 сек
________________

Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).

В любом из нас спит гений. И с каждым днем все крепче.
Запомните раз и навсегда:= 'Помочь' <> 'Сделайте за меня';

Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
  Ответить с цитированием
Старый 27.10.2011, 23:15   #3
Читер-спонсор
 Сержант
Аватар для gum_classis
 
gum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядом
Регистрация: 03.04.2011
Сообщений: 128
Популярность: 5379
Сказал(а) спасибо: 137
Поблагодарили 209 раз(а) в 111 сообщениях
Отправить сообщение для gum_classis с помощью ICQ Отправить сообщение для gum_classis с помощью Skype™
 
По умолчанию Re: С циклом

Цитата:
Сообщение от J-FobosПосмотреть сообщение
вставить в цикл sleep (1000), но если такое делать в главном потоке, то он будет останавливать всю прогу, будет выглядеть что программа подвисает.

зы: 1000 = 1 сек

Программа просто зависла никакого эффекта
________________
DO:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
WF:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
  Ответить с цитированием
Старый 27.10.2011, 23:20   #4
Reaper
 Фельдмаршал
Аватар для Dinmaite
 
Dinmaite сломал счётчик популярности :(Dinmaite сломал счётчик популярности :(Dinmaite сломал счётчик популярности :(Dinmaite сломал счётчик популярности :(Dinmaite сломал счётчик популярности :(Dinmaite сломал счётчик популярности :(Dinmaite сломал счётчик популярности :(Dinmaite сломал счётчик популярности :(Dinmaite сломал счётчик популярности :(Dinmaite сломал счётчик популярности :(Dinmaite сломал счётчик популярности :(
Регистрация: 13.08.2009
Сообщений: 1,004
Популярность: 25098
Золото Zhyk.Ru: 350
Сказал(а) спасибо: 111
Поблагодарили 830 раз(а) в 395 сообщениях
Отправить сообщение для Dinmaite с помощью ICQ
 
По умолчанию Re: С циклом

Цитата:
Сообщение от gum_classisПосмотреть сообщение
Программа просто зависла никакого эффекта

Я так думаю "зависла" значит остановилась.
И будет стоять пока не выполнится цикл.
Ну и после этого будет перерисовано окно.
________________
Ни одно доброе дело не остается безнаказанным.

Программы:
PW:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
,
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
,
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
,
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
,
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
,
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
.
JD:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
,
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
,
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
.
Статьи:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
,
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
,
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
,
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
,
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).


Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
  Ответить с цитированием
Старый 27.10.2011, 23:27   #5
Читер-спонсор
 Сержант
Аватар для gum_classis
 
gum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядом
Регистрация: 03.04.2011
Сообщений: 128
Популярность: 5379
Сказал(а) спасибо: 137
Поблагодарили 209 раз(а) в 111 сообщениях
Отправить сообщение для gum_classis с помощью ICQ Отправить сообщение для gum_classis с помощью Skype™
 
По умолчанию Re: С циклом

Цитата:
Сообщение от DinmaiteПосмотреть сообщение
Я так думаю "зависла" значит остановилась.
И будет стоять пока не выполнится цикл.
Ну и после этого будет перерисовано окно.

А как сделать чтобы программа не "остановилась" а прибавляла +1 к переменной "а" то есть в label отображался как бы таймер который увеличивал бы число на 1 каждую секунду
________________
DO:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
WF:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
  Ответить с цитированием
Старый 27.10.2011, 23:31   #6
NoItemName
 Рыцарь
Аватар для J-Fobos
 
J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(
Регистрация: 12.04.2009
Сообщений: 394
Популярность: 47903
Сказал(а) спасибо: 515
Поблагодарили 1,124 раз(а) в 430 сообщениях
 
По умолчанию Re: С циклом

gum_classis, либо заюзать такой компонент как таймер, либо делать цикл в отдельном потоке. Либо перерисовывать окно в каждой итерации цикла.
________________

Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).

В любом из нас спит гений. И с каждым днем все крепче.
Запомните раз и навсегда:= 'Помочь' <> 'Сделайте за меня';

Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
  Ответить с цитированием
Старый 27.10.2011, 23:36   #7
Читер-спонсор
 Сержант
Аватар для gum_classis
 
gum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядом
Регистрация: 03.04.2011
Сообщений: 128
Популярность: 5379
Сказал(а) спасибо: 137
Поблагодарили 209 раз(а) в 111 сообщениях
Отправить сообщение для gum_classis с помощью ICQ Отправить сообщение для gum_classis с помощью Skype™
 
По умолчанию Re: С циклом

Цитата:
Сообщение от J-FobosПосмотреть сообщение
gum_classis, либо заюзать такой компонент как таймер, либо делать цикл в отдельном потоке. Либо перерисовывать окно в каждой итерации цикла.

Через таймер я и сам могу мне именно через этот цикл надо прошу помощи!
________________
DO:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
WF:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
  Ответить с цитированием
Старый 28.10.2011, 08:31   #8
 Разведчик
Аватар для maxilam
 
maxilam на правильном пути
Регистрация: 17.10.2011
Сообщений: 0
Популярность: 32
Сказал(а) спасибо: 0
Поблагодарили 11 раз(а) в 7 сообщениях
 
По умолчанию Re: С циклом

После
Код:
sleep (1000);
напиши
Код:
Application.ProcessMessages;
ProcessMessages - заставляет программу обработать все сообщения находящиеся в очереди
  Ответить с цитированием
Старый 28.10.2011, 13:45   #9
Читер-спонсор
 Сержант
Аватар для gum_classis
 
gum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядомgum_classis в состоянии испепелить взглядом
Регистрация: 03.04.2011
Сообщений: 128
Популярность: 5379
Сказал(а) спасибо: 137
Поблагодарили 209 раз(а) в 111 сообщениях
Отправить сообщение для gum_classis с помощью ICQ Отправить сообщение для gum_classis с помощью Skype™
 
По умолчанию Re: С циклом

Цитата:
Сообщение от maxilamПосмотреть сообщение
После
Код:

sleep (1000);

напиши
Код:

Application.ProcessMessages;

ProcessMessages - заставляет программу обработать все сообщения находящиеся в очереди

Программа по прежнему зависла и нечего не делает!
________________
DO:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
WF:
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
;
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
  Ответить с цитированием
Старый 28.10.2011, 13:53   #10
Заблокирован
 Пехотинец
Аватар для lolwut98
 
lolwut98 блестящий пример для подражанияlolwut98 блестящий пример для подражанияlolwut98 блестящий пример для подражанияlolwut98 блестящий пример для подражанияlolwut98 блестящий пример для подражанияlolwut98 блестящий пример для подражанияlolwut98 блестящий пример для подражанияlolwut98 блестящий пример для подражанияlolwut98 блестящий пример для подражанияlolwut98 блестящий пример для подражанияlolwut98 блестящий пример для подражания
Регистрация: 16.07.2011
Сообщений: 97
Популярность: 2528
Сказал(а) спасибо: 61
Поблагодарили 336 раз(а) в 61 сообщениях
Отправить сообщение для lolwut98 с помощью ICQ Отправить сообщение для lolwut98 с помощью Skype™
 
По умолчанию Re: С циклом

http://zhyk.ru/forum/showthread.php?t=237754
  Ответить с цитированием
Ответ


Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Баг] Циклон и бабл паладинов maxxx Читы, баги и статьи по WoW 0 23.11.2009 08:40

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 03:01.

Пишите нам: forum@zhyk.ru
Copyright © 2025 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net