![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
процент выполнения
Daria © (2006-01-26 15:23:00)и еще вопрос.
как отображать процент выполнения программы?
Ell (2006-01-26 15:51:00) [1]Блин, ерунду я в [5] написал, надо было
ProgressBar1.Position:=i div 10;
невнимательный, сорри....
(Просто, что-то подобное вспомнилось, когда один процесс выполнялся быстрее другого, если вспомню, приведу пример)
Digitman (2006-01-26 15:45:00) [2]
> Почему не соответствует промежуток между бипами скорости
> заполнения ProgressBar?
Потому что ты не даешь возможности окну прогресса перерисоваться вовремя ..
На то существует как минимум метод Update()
Digitman (2006-01-26 15:43:00) [3]Даша, вообще-то "консоль" - оно женского рода.
И write()/writeln() вне зависимости от рода разного рода консолей (пардон за каламбур) - верное направление ..
Ell (2006-01-26 15:42:00) [4]Кстати, насчёт процента выполнения.
Давно хотел спросить, сейчас вспомнил. Можете мне ответить, что за фигня получается? Помещаем на форму TButton и TprogressBar. Пишем:
procedure TForm1.Button1Click(Sender: TObject);
begin
beep;
for i:=1 to 1000 do
begin
sleep (1);
ProgressBar1.Position:=i;
end;
beep;
end;
Почему не соответствует промежуток между бипами скорости заполнения ProgressBar?
Sergey13 (2006-01-26 15:35:00) [5]2[2] Daria (26.01.06 15:26)
>?? а что сделано-то?
8-))))))))))))))))))))))))))))))))))))))))))))
Vlad (2006-01-26 15:30:00) [6]
> Daria (26.01.06 15:26) [2]
Писать в консоли - write, writeln
Daria (2006-01-26 15:26:00) [7]?? а что сделано-то?
у меня в консоле волжно отодражаться "обработано " и выполненный %. чтобы можно было следить, когда прога дойдет до 100%, то все сделано
kukuikar (2006-01-26 15:25:00) [8]Сколько сделано программой поделить на 100....
Вот тебе и процент выполнения.