Io uso questa procedura:Cosa fa ShFileOperation quando il cestino è pieno?
function MoveToRecycle(sFileName: widestring): Boolean;
var
fos: TSHFileOpStructW;
begin
FillChar(fos, SizeOf(fos), 0);
with fos do
begin
wnd := 0;
wFunc := FO_DELETE;
pFrom := PWideChar(sFileName + #0 + #0);
pTo := #0 + #0;
fFlags := FOF_FILESONLY or FOF_ALLOWUNDO or FOF_NOCONFIRMATION or FOF_SILENT;
end;
Result := (ShFileOperationW(fos) = 0);
end;
che cosa accadrà se il cestino è pieno, vuol restituire false o eliminare file in modo permanente?
Qualsiasi aiuto sarebbe apprezzato.
Rientra il codice di quattro spazi per visualizzarlo correttamente. –
Non ero a conoscenza del fatto che il Cestino può essere "pieno". Come funziona? –
A proposito: bella funzione. In realtà è bello sapere come spostarsi nel cestino. Ho sempre usato la funzione "deletefile". –