Вниз
Скачать: CL | DM;

процент выполнения   Найти похожие ветки 

← →
Daria   (2006-01-26 15:23) [0]

и еще вопрос.
как отображать процент выполнения программы?


← →
kukuikar ©   (2006-01-26 15:25) [1]

Сколько сделано программой поделить на 100....
Вот тебе и процент выполнения.


← →
Daria   (2006-01-26 15:26) [2]

?? а что сделано-то?
у меня в консоле волжно отодражаться "обработано " и выполненный %. чтобы можно было следить, когда прога дойдет до 100%, то все сделано


← →
Vlad ©   (2006-01-26 15:30) [3]


> Daria   (26.01.06 15:26) [2]

Писать в консоли - write, writeln


← →
Sergey13 ©   (2006-01-26 15:35) [4]

2[2] Daria   (26.01.06 15:26)
>?? а что сделано-то?
8-))))))))))))))))))))))))))))))))))))))))))))


← →
Ell ©   (2006-01-26 15:42) [5]

Кстати, насчёт процента выполнения.
Давно хотел спросить, сейчас вспомнил. Можете мне ответить, что за фигня получается? Помещаем на форму 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?


← →
Digitman ©   (2006-01-26 15:43) [6]

Даша, вообще-то "консоль" - оно женского рода.

И write()/writeln() вне зависимости от рода разного рода консолей (пардон за каламбур) - верное направление ..


← →
Digitman ©   (2006-01-26 15:45) [7]


> Почему не соответствует промежуток между бипами скорости
> заполнения ProgressBar?


Потому что ты не даешь возможности окну прогресса перерисоваться вовремя ..

На то существует как минимум метод Update()


← →
Ell ©   (2006-01-26 15:51) [8]

Блин, ерунду я в [5] написал, надо было
ProgressBar1.Position:=i div 10;
невнимательный, сорри....

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c
2-1138054140
DenXi
2006-01-24 01:09
2006.02.12
TService и че с ним делать


15-1137571462
PKT
2006-01-18 11:04
2006.02.12
Выбрать предмет в универе


1-1137272603
2Wish
2006-01-15 00:03
2006.02.12
Где ошибка


2-1137602437
Glex
2006-01-18 19:40
2006.02.12
Выбор компонента по его имени(не могу точно сформулировать...=( )


15-1138081406
wHammer
2006-01-24 08:43
2006.02.12
Большие целые числа (Delphi 5)




   Наверх