ещё раз повторю...
Код:
var
F: TIniFile;
begin
F:= TIniFile.Create(ChangeFileExt(ParamStr(0),'rgrgfg.ini'));
F.WriteString('Param','Id1',Edit1.Text);
f.free;
end;
он создаёт
в папке с приложением ини файл rgrgfg.ini
если нужно именно в этой папке...
меня никто не видит