Delete File

Applicazione.DeleteFile(percorso)

public boolean OggettoFS.Elimina()
{
  // Se esiste ancora
  if Esiste()
  {
    // Provo a cancellare
    try
    {
      // Se è una cartella
      if GetNamedPropertyValue(Cartella) = True
      {
         EsempiMS.DeleteDirectory(GetNamedPropertyValue(NomeCompleto))
      }
      else  // Se è un file
      {
         EsempiMS.DeleteFile(GetNamedPropertyValue(NomeCompleto))
      }
    }
  }
  // 
  // Se non c'è più
  if NOT(Esiste())
  {
    // Se ho un padre
    if NOT(Parent IS Null Object)
      ...
    // 
    // Cancellazione avvenuta
    return True
  }
  else  // C'è ancora
  {
    // Cancellazione non avvenuta
    return False
  }
}