Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Пользователь


Сообщения: 66
Благодарности: 29

Профиль | Отправить PM | Цитировать


Serega_, хотел бы вернуться к своему вопросу по поводу фриарка.
Создается вот такой лог:
Лог

FreeArc 0.50 alpha (June 23 2008) extracting archive: archive.arc
Extracting 28 files, 1.878.921.539 bytes. Processed 0.0% 0.0% 0.0% 0.0% 0.0% 0.0% 0.0% 0.0% 0.0% 0.0% 0.0% 0.0% 1.9% 2.5% 3.5% 4.5% 4.8% 5.5% 5.8% 6.1% 6.2% 6.4% 7.0% 7.9% 8.7% 8.9% 9.2% 9.8% 10.2% 10.3% 10.9% 11.6% 12.1% 12.6% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 12.9% 14.1% 14.3% 15.1% 15.1% 15.5% 15.7% 15.8% 16.5% 17.5% 17.8% 18.4% 18.9% 19.2% 19.6% 20.2% 20.5% 21.6% 21.9% 22.9% 23.3% 23.8% 24.1% 24.2% 24.9% 25.1% 25.8% 26.3% 26.8% 27.2% 27.6% 27.8% 28.4% 28.5% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 29.0% 30.2% 30.6% 32.5% 33.4% 33.9% 35.0% 35.5% 36.5% 37.1% 37.5% 37.9% 38.6% 38.8% 39.4% 40.1% 40.6% 41.0% 41.6% 42.0% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 42.4% 43.2% 44.6% 45.3% 46.3% 46.7% 47.3% 48.5% 48.9% 49.6% 50.1% 50.8% 51.3% 51.7% 52.4% 53.3% 53.3% 54.6% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 54.9% 55.7% 56.9% 58.0% 59.0% 59.6% 60.5% 61.1% 61.3% 61.9% 62.3% 62.9% 63.6% 64.2% 65.1% 65.4% 66.0% 66.0% 66.0% 66.0% 66.0% 66.0% 66.0% 66.0% 66.0% 66.0% 66.0% 66.0% 66.0% 66.0% 66.0% 66.0% 67.1% 67.6% 68.5% 68.9% 69.8% 70.3% 71.4% 72.2% 72.6% 73.2% 74.0% 74.6% 75.4% 75.9% 76.8% 77.2% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 77.6% 78.2% 79.9% 80.0% 80.3% 81.1% 82.3% 83.0% 83.2% 83.4% 83.5% 84.6% 85.4% 86.5% 86.9% 86.9% 87.1% 87.7% 87.9% 88.1% 88.1% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 89.2% 90.0% 90.6% 90.8% 92.1% 92.9% 93.9% 94.6% 95.5% 96.5% 96.8% 97.4% 97.6% 98.3% 99.5% 99.6% 99.6% 99.6% 99.6% 99.7%

Extracted 28 files, 529.994.251 => 1.878.921.539 bytes. Ratio 28.2%
Extraction time 53.06 secs, speed 35.414 kB/s. Total 160.86 secs
All OK

Как заставить инсталл обращаться к этому файлу, считывать оттуда проценты и выводить их на прогресс-бар?
У меня есть небольшой кусок нужного мне кода, но я не знаю, как довести его до ума.
Код

procent$=StrFromFile(file$,1,-1)
position=LEN(procent$)
position$=StrGet(procent$,position)
If (position$='%') Then
procent_bar$=''
position=position-5
procent_bar$=procent_bar$+StrGet(procent$,position)
position=position+1
procent_bar$=procent_bar$+StrGet(procent$,position)
position=position+1
procent_bar$=procent_bar$+StrGet(procent$,position)
position=position+1
procent_bar$=procent_bar$+StrGet(procent$,position)
position=position+1
procent_bar$=procent_bar$+StrGet(procent$,position)
position=position+1
procent_bar$=procent_bar$+StrGet(procent$,position)
newbar=VAL(procent_bar$)
shownprogress=INT(newbar)
newbar=newbar+diskscount
procent$=CHAR(newbar)

Отправлено: 04:09, 02-05-2009 | #662