为什么使用了UpdateFile还不能写入INI文件？

[xingjiaren]

procedure TForm1.Button2Click(Sender: TObject);

var

ini:tinifile;

begin

try

ini:=tinifile.Create('Tips.ini');

ini.DeleteKey('Data','LastPage');

ini.WriteInteger('Data','LastPage',8);

ini.WriteBool('Data','Show',checkbox1.Checked);

ini.UpdateFile;

finally

ini.Free;

end;

close;

end;