Hola,
Nope... algo como esto:
Código Delphi
[-]
if (ShFileOperation(FileOp) = 0) then
TNbUtilities.FijarVariable(rsVarResultadoAccion,rsValorTrue)
else
begin
TNbUtilities.FijarVariable(rsVarResultadoAccion,rsValorFalse);
TNbUtilities.FijarVariable(rsVarUltimoError,SysErrorMessage(GetLastError()));
end;
Sigue retornando en "SysErrorMessage(GetLastError())" "La operación se ha completado correctamente", incluso cuando no es así, es decir, "ShFileOperation" retornó algo distinto de cero, puesto que "la carpeta a borrar" no existe...
PD. Estoy ahora investigando sobre la función "Win32Check", porque lo que dice la ayuda parece muy interesante...