Показать сообщение отдельно
  #1  
Старый 21.11.2018, 19:06
val-tal val-tal вне форума
Прохожий
 
Регистрация: 21.11.2018
Сообщения: 3
Версия Delphi: Delphi7
Репутация: 10
По умолчанию Доработать, исправить код

задача такая, среда Delphi7-Имеется Memo с некими строками типа :

болт=1 //(болт-название, 1- количество)
машина=4
булка=3
пустая строка

и имеется текстовый файл пустой! или со строками типа:
12.12.2018
компот=2
болт=1
машина =1
пустая строка

Задание: нужно пройтись по Мемо по всем строкам , найти в файле совпадения типа
болт=болт и сложить их количество и перезаписать исходный файл с новыми значениями количества,
если в файле нет совпадения типа "Болт"="Болт""
. то просто добавить в файл такую строку

В этом примере в файле должны быть записаны получившиеся строки
12.12.2018
болт=2
машина=5
булка=3
компот=2

Оплата:
1. Вы мне присылаете на почту exe-шник, я проверяю работоспособность кода
2. Если меня все устраивает в коде, отправляю вам деньги-вы мне исходный код
Кусок кода я вам предоставляю, вы его исправляете, дополняете и т.д.
Базы данных не предлагать и прочие хеш таблицы, только Мемо и текстовый файл (такие условия)
со мной связаться если после 17-00 в аське 699297384 или днем на мыло val-tal35@mail.ru
Ответить с цитированием