Delphi-Quellcode:
procedure TForm1.Button4Click(Sender: TObject);
var
ini: TIniFile;
begin
ini:=TIniFile.create(ExtractFilePath(Application.exename)+Edit1.Text+'.btc');
ini.free; // <-------------
ini.WriteString('Programm:','Edit1.Text',Edit1.Text);
ini.free; <-- wenn, dann passt es hier hin.
end;
Du gibst die Instanz ja direkt wieder frei und wenn Du dann in das ini etwas
hineinschreiben willst, gibt es die Instanz nicht mehr.
Grüße
Klaus