ini - мозгоубивание

[evg_m]

процедура по ПЕРЕИМЕНОВАНИЮ INI секции

procedure Renmaesection(const oldname, newname: string);
var
  lst: TstringList;
  ini: TiniFile;
begin
  lst:=tstringList.create;
  ini.readSection(oldname);
  for j:=0 to lst.count-1 do
    ini.writeString(newnmae, lst.name[j], lst.valuefromindex[j]);
  ini.eraseSection;
lst.Free;end;

и ее использование

  for j:=5 to 7 do
    Renmaesection('вопрос '+inttostr(j), 'вопрос ' +inttostr(j+1);