так у вас всегда будут значения переменных в своей строке (если в каком-либо LabeledEdit'e не будет данных, на месте этого значения будет пустая строка)
Код:
procedure TForm4.Button1Click(Sender: TObject);
var
SList:TStringList;// объявление локальной переменной
begin
SList:=TStringList.Create;
SList.Clear;
SList.Add(LabeledEdit1.Text);
SList.Add(LabeledEdit2.Text);
SList.Add(LabeledEdit3.Text);
SList.SaveToFile('Settings\Tarif.cfg');
SList.Free;
end;
лучше использовать
TIniFile
Count-1: индекс последнего элемента в спсике ВСЕГДА меньше количества элементов на единицу (элементы нумеруются с нуля), т.е. если в листе один элемент, то последний элемент имеет индекс ноль, если два, то последний элемент имеет индекс один и т.д. (Count-1)
для того, чтобы вставить в позицию последнего элемента, как гарантировано существующего в не пустом списке, то используется
Код:
Insert(Count-1,'blablabla');