Datei kann nicht geschrieben werden - Warum und wie ändern?

[semo]

wie wäre es denn damit?

Delphi-Quellcode:

  sFileName := Pvw_Path + 'artikel_id_'+inttostr(ArtikelNumber)+'.html';

  if fileexists(sFileName) then
    DeleteFile(sFileName);

  HtmlList.SaveToFile(sFileName);
  myList.Free;
  HtmlList.Free; 
  if LoadatWeb then
    web.Navigate(sFileName);