[Delphi] errore quando scrivo su file

[DonFabio]

Da questa procedura (che fino a qualche giorno fa funzionava) devo creare un file di testo e scrivere delle linee in questo. Ma, adesso, stranamente, mi da una risposta che non capisco: i/o error 183.

Tipo che non abbia i permessi per scrivere sul file che lo script stesso ha creato. Come mai? :master:
Cosa sbaglio?

Ripeto, funzionava. Cancellando e ricreando la cartella mi ha dato quest'errore.
Come mai?

L'errore segnalato è nella riga in grassetto.

procedure TForm1.Button2Click(Sender: TObject);
begin
//tutto per l'ftp + crazione file txt
idftp1.Connect();
idftp1.TransferType:=ftascii;
idftp1.ChangeDir(GrabLine2(fileconf, 4));
idftp1.ChangeDir(GrabLine2(fileconf, 5));
nomefile:=label2.Caption;

//creo il file
testo:=edit1.Text;
file2:=testo+'.txt';
AssignFile(w, path+testo+'.txt');
ReWrite(w);
Writeln(w, testo);
Writeln(w, nomefile);
Closefile(w);

//mando, cancello e resetto tutto
idftp1.Put(path+nomefile, sr.name, false);
idftp1.Put(path+file2, file2, false);
deletefile(path+nomefile);
deletefile(path+file2);
idftp1.Disconnect;
//label2.Caption:='';
edit1.Text:='';
button2.Enabled:=false;
form1.Visible:=false;
end;

Help...

[DonFabio]

Risolto...dovevo inserire prima dell'istanza oggetto {$I-}

[alka]

Non è più comodo usare una semplicissima TStringList e il suo metodo SaveToFile per compilare un testo e salvarlo su disco?

Ciao!