File.WriteString(SectionComboBox.Text,

                        IdentComboBox.Text,

                        IdentValueEdit.Text);

  end;

  IdentValueEdit.Enabled:=False;

  CmdSave.Enabled:=False;

end;

  

procedure TIniForm.FormDestroy(Sender: TObject);

begin

  IniFile.Free;  { 释放创建的对象 }

end;

  

end.

以上方法在Windows 95下用Delphi 3.0调试通过。