> Hi!
>
> I fixed bug 4692
>
> THe problem is in inifiles.pas
> Change the following procedure for:
> procedure TIniFile.DeleteKey(const Section, Ident: String);
> var
> oSection: TIniFileSection;
> oKey: TIniFileKey;
> begin
> oSection := FSectionList.SectionByName(Section);
> if oSection <>
Hi!
I fixed bug 4692
THe problem is in inifiles.pas
Change the following procedure for:
procedure TIniFile.DeleteKey(const Section, Ident: String);
var
oSection: TIniFileSection;
oKey: TIniFileKey;
begin
oSection := FSectionList.SectionByName(Section);
if oSection <> nil then begin
oKey := oS