[roamer]

*.inf имеет такую же структуру, как *.ini
Поэтому, можно использовать методы объекта TIniFile.
Типа:

Код:

PutToINI_StringParam('C:\setup.inf','Autorun','open',Edit1.text);;
PutToINI_StringParam('C:\setup.inf','Autorun','label',Edit2.text);;
PutToINI_StringParam('C:\setup.inf','Autorun','icon',Edit3.text);;

...
Uses
  ...
  IniFiles;

procedure PutToINI_StringParam(NameINI,NameTop,NameParam,S : string; YesAllTrimValue:boolean=true);
begin
  if YesAllTrimValue then S:=Trim(S);
  NameINI:=Trim(NameINI);
  NameTop:=Trim(NameTop);
  NameParam:=Trim(NameParam);
  if (length(NameINI)>0) and (length(NameTop)>0) and (length(NameParam)>0) then begin
     with TIniFile.Create(NameINI) do
       begin
         TRY
           WriteString(NameTop,NameParam,S);
         FINALLY
           Free;
         END;
     end;
  end;
end;