Проще сразу строкой Например нашли позицию двоеточия
c := pos(':', STRINGLIST1.Strings[i]);

далее два символа время + 1 пробел, дальше нужное число из 11 символов значит
s := Copy(STRINGLIST1.Strings[i], c + 2 + 1, 11);
это строчное представление

var
b : int64; будет число так как в integer не поместится

b := strToInt64(s);

вот он заветный номер

далее ищем слово "сек."
c := pos('сек.', STRINGLIST1.Strings[i]);

и проводим анологичные операции (кстати в фаронове turbo pascal)
хорошо описаны функции работы со строками все годится идля делфи

Зачем? Можно просто строкой хранить.

так нужно складывать и делить

Что то я долго отвечал но ...не, прога- не секрет, я вообще потом работу хотел выложить на "Арсенал форумистов", может пригодится кому! Ну я вроде понятно в начале темы обьяснил... попробую ещё разок.. подробнее..
Детализированный счёт приходит в html на мыло. Для удобства работы сохраняем его как тхт фаил в котором:

нужно сначала найти нужный номер в тхт (например "Телефон 2584444 Счет 2567896" ), причем условием поиска задавать нужно Счет 2567896 (т.к. в одном файле отчёта может быть несколько номеров счетов, и такое нужно будет с каждым заданным проделать).
Потом есть список номеров телефонов, которые надо отфильтровать... например есть в этом списке номер (3я строка - 79214658166). мы его фильтруем, удаляя всю строку, НО! запомнив цифры в конце... чтобы потом их вычесть из ИТОГО
и потом вывести результат ввиде хоть чего... месага или файла... это не суть важно... тоесть в конце после фильтрации мы должны получить типа:


исходники набросанной проги могу прикрепить...

Это сообщение отредактировал(а) h2o - 17.1.2006, 15:57

Присоединённый файл ( Кол-во скачиваний: 6 )
 ______________________.rar 32,27 Kb

А не проще заново сумировать?

//
Алгоритм таков:
Находим Счет 2567896 (или нужный) и копируем допустим в стриггрид, две строки выше счета и со счетом,
далее проверяем строку идущую ниже, на присутствие номера (как в 3 строке у тя), нет копируем, плюс берем последнее чило после "сек. " и добовляем к промеж. переменной ( sum: float),
далее след. строка
нашли в строке "итого" Заменяем эту строку своей "Итого "+вывод sum

Вообщем всё получилось! Всем спасибо за помощь. все операции написал ручками, без компонентов.
Если кому нужнена программа фильтрации номеров телефонов, выкладываю тут!

Это сообщение отредактировал(а) h2o - 24.1.2006, 13:18

Присоединённый файл ( Кол-во скачиваний: 10 )
 MTF.rar 67,84 Kb