如何删除ini文件中的所有内容？

Question

如何删除ini文件中的所有内容？（最好有语句）

Answer 1

我想到的最简单方法：用一个空文件覆盖procedure TForm1.Button1Click(Sender: TObject);
begin
memo1.Clear;
memo1.Lines.SaveToFile('d:\config.ini');
end;

Answer 2

删除ini文件中的所有内容那还不办？你也可以新建一个文件，名字和它相同就行啦，呵呵。

Answer 3

procedure TForm1.Button1Click(Sender: TObject);
var inifile:TIniFile;
    i:integer;
    lstrs:TStrings;
begin
  inifile:=TIniFile.Create('C:\Documents and Settings\Administrator\桌面\ClientConfig.INI');
  lstrs:=TStringList.Create;
  inifile.ReadSections(lstrs);
  for i:=0 to lstrs.Count-1 do
    inifile.EraseSection(lstrs.Strings[i]);
  inifile.Free;
end;