Cómo borrar un archivo de texto usando el programa Delphi

función closeFile(filename:string):Boolean;

var

sFile: File;//Tipo de archivo

comenzar p>

AssignFile(sFile,filename); //el nombre del archivo es la ruta del archivo como c:\1.txt y está vinculado al tipo de sFile

Rewrite(sFile); Crear y reescribir texto

Cerrar(sFile);//Cerrar tipo

si FileExists(nombre de archivo) y luego vincular si el archivo existe

Resultado:= Verdadero en caso contrario devuelve Verdadero si existe

Resultado:= Falso; devuelve Falso si no existe

end;