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

Как использовать прогрес-бар для РичЕдит   Найти похожие ветки 

← →
wander   (2007-01-15 11:41) [0]

Добрый день!
Нуждаюсь в помощи :-)
у меня программа которая служит графической оболочкой для консольного приложения. Тоесть - консоль прячется, а весь вывод и управление направляется через пайпы в РичЕдит.
Так вот, каждый раз естественно я не знаю сколько строк в РичЕдите получиться, но как только вывод в РичЕдит прекращается - это означает конец работы консольного приложения.
Помогите - как мне использовать прогрес-бар что б не смотреть на вывод РичЕдита.
Да и еще - в этом РичЕдите бегут строки такого типа:
"" 101 2546f  23658n (43%) 123\34556 123/56  "" - как видно в каждой строке есть уже состояние в процентах. - Пытался читать каждую строку и выделять эти проценты - но случается ошибка когда пытаюсь взятые проценты перевести в числовое значение (strtoint()), может это потому что
в РичЕдите не сам текст а лишь указатель на текст в консоли - тогда не знаю может есть функция что переконвертит этот указатель в текст???
ПОМОГИТЕ !!!! ПЛИЗ.


← →
clickmaker ©   (2007-01-15 12:05) [1]


> как мне использовать прогрес-бар что б не смотреть на вывод
> РичЕдита

ну для этого, как минимум, нужно знать максимум...

> ошибка когда пытаюсь взятые проценты перевести в числовое
> значение

как пытаешься, что за ошибка?


← →
wander   (2007-01-15 13:28) [2]

for i:=1 to richedit1.lines.count-1 do
begin
edit1.text:=Richedit1.lines[i];

//так перевожу каждую строчку в edit и тут же пробую брать 22 символ(это и есть проценты)

progresbar1.position:=strtoint(edit1.text[22])
end;

//без прогрес-бар едит принимает каждую строчку, токо пытаюсь перевести 22 символ в число - ошыбка
кстати - на простой форме с этими же компонентами - работает (только в РичЕдит ввожу текст в процессе работы программы,а тут текст сам летит из консоли а РичЕдит его выводит)


← →
clickmaker ©   (2007-01-15 13:34) [3]


> //так перевожу каждую строчку в edit и тут же пробую брать
> 22 символ(это и есть проценты)
>
> progresbar1.position:=strtoint(edit1.text[22])
> end;
>
> //без прогрес-бар едит принимает каждую строчку, токо пытаюсь
> перевести 22 символ в число - ошыбка

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


← →
wander   (2007-01-15 14:21) [4]

Спасибо. Оплошал - все ок.



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

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



Память: 0.46 MB
Время: 0.036 c
3-1163410504
Gyrus
2006-11-13 12:35
2007.02.04
Скопировать таблицы


2-1168787120
Pasha L
2007-01-14 18:05
2007.02.04
перекинуть картинку из twebBrowser, в timage


2-1168957625
cvg
2007-01-16 17:27
2007.02.04
Что за чудеса с проверкой на nil?


2-1168690301
Garacio
2007-01-13 15:11
2007.02.04
ShellExecute (спрятать запущенный процесс)


2-1169117274
knever
2007-01-18 13:47
2007.02.04
Оптимизация скорости работы программ для технических расчетов




   Наверх