Изменение данных в текстовом файле

← →
yurik85 © (2009-01-23 10:26) [0]

Подскажите, пожалуйста. Есть текстовый файл. Строка состоит из трех данных через пробел: штрих-код, нименование и количество. Как изменить только количество?

← →
charoey_mag (2009-01-23 10:34) [1]

искать с конца пробел и изменить кол-во

← →
KilkennyCat © (2009-01-23 10:36) [2]

Есть два способа:
Определяем при помощи Pos (или еще одной функции, непомню названиеи, см. в справочнике - определяет первый делиметр справа) последний пробел, копируем (Copy) с первого символа по найденный, прибавляем новое название.
Второй способ : чаще всего там встречается еще и фиксированность размера этих данных. Тогда мы четко можем знать, где "количество", и создаем новую строку новая := Copy(исходная, 1, размерШтрих + размерНаименование) + количество

← →
charoey_mag (2009-01-23 10:37) [3]

s:string;
i:integer;
i:=length(s);
while s[i]<>" " do
dec(i);
s:=delete(s,1,i); <- останется все что после последненго пробела
i:=StrToInt(s); <- кол-во

← →
KilkennyCat © (2009-01-23 11:02) [4]

> charoey_mag (23.01.09 10:37) [3]

есть проще способ.

Stroka : string - изменяемая строка
Kolvo : string - количество

Stroka := Сopy(Stroka , 1, LastDelimiter(" ", Stroka)) + Kolvo;

Возможно, потеряется пробел. Это мелочи :)

> yurik85 (23.01.2009 10:26:00) [0]

Штрих код и текстовый файл, не путаешь где то?

> Anatoly Podgoretsky ©

штрих-код можно записать текстом. Два варианта: его цифровой аналог; использование спецфонта. 1C, например, использует такой фонт.

Изменение данных в текстовом файле Найти похожие ветки