Mover carpetas completas
 

Estimados, tengo el siguiente codigo obtenido de algun post de este club para mover una carpeta completa y sus archivos de un disco a otro.

Código Delphi [-]
function Tfrm_Main.MoveDir(const fromDir, toDir: string): Boolean;
var
  fos: TSHFileOpStruct;
begin
    ZeroMemory(@fos, SizeOf(fos));
    with fos do
    begin
        wFunc  := FO_MOVE;
        fFlags := FOF_FILESONLY;
        pFrom  := PChar(fromDir + #0);
        pTo    := PChar(toDir)
    end;
    Result := (0 = ShFileOperation(fos) );
end;

Por lo que he probado, utiliza alguna api de Windows para realizar este proceso y mi consulta es como puedo hacer para que no pregunte si deseo sobreescribir o "combinar" carpetas ? mi deseo es que mueva directamente sin preguntar. Es posible ?

Muchas gracias.

Estimado, si quiere seguir utilizando TSHFileOpStruct, puede usar la propiedad fFlags para que la operación no pregunte eso que Ud. dice.

Para saber qué valores recibe, busque la declaración de FOF_FILESONLY en la unidad ShellApi de su versión de Delphi. Ahí junto con esa constante, están declaradas las otras que se pueden utilizar (FOF_MULTIDESTFILES, FOF_CONFIRMMOUSE, etc).
-

Muchas gracias TOPX, buscare informacion sobre ello.

Saludos

Yo he seguido más po menos el mismo camino...
https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx

Y llegas a los Flags:

Ahí es cuestión de probar, pero este FOF_NOCONFIRMATION y este otro FOF_NOCONFIRMMKDIR tienen posibilidades.

Muchas gracias Neftali.

Justo estaba mirando esa info y me ha servido un monton.

Saludos