Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите решить задачу [D6, WinXP]


Alex77777 ©   (2005-08-04 20:28:00) 

Здравствуйте!

Помогите решить такую задачу.
Есть каталог Vedomosti (в нём ещё несколько
каталогов 1,2,3,4,5,6,7,8,9,10) в них порядка 20 текстовых файлов
(ved1.txt,ved2.txt,ved3.txt и т.д.).В каждом файле подведён итог:
Всего начислено:количество...10   сумма...1111.12 руб.
ЗАДАЧА:
Как я понимаю, необходимо с каждого файла прочитать строку
Всего начислено: и вывести ОБЩУЮ СУММУ Всего начислено!.
Т.е. указать путь например: Vedomosti и чтобы вывел итог.
Желательно с примером.

Заранееь благодарен кто откликнется


Джо   (2005-08-04 20:52:00) [1]


>  [5] Alex77777 ©   (04.08.05 20:49)
> Как просуммировать хотя бы скажите ?

Variable := Variable + AnotherVariable;


Anatoly Podgoretsky   (2005-08-04 20:52:00) [2]

S := S + N


Alex77777   (2005-08-04 20:49:00) [3]

Как просуммировать хотя бы скажите ?


Гость22   (2005-08-04 20:36:00) [4]


> Alex77777 ©   (04.08.05 20:28)  

ты предлагаешь код за тебя написать?


Alex77777   (2005-08-04 20:35:00) [5]

в коде загвоздка :((


Джо   (2005-08-04 20:32:00) [6]

А в чем загвоздка?


Fay   (2005-08-04 20:31:00) [7]

2 Alex77777 ©   (04.08.05 20:28)
>> Как я понимаю, необходимо с каждого файла прочитать строку
>> Всего начислено: и вывести ОБЩУЮ СУММУ Всего начислено!.
Правильно понимаешь. Так и сделай.


Наверх

Титульная страница Поиск, карта сайта Написать письмо