copiar un directorio

[DOS994]

Hola a todos necesito traducir este codigo a Borland C++

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
 function CopiaTodo(Origen,Destino : String) :
  LongInt;
  var 
    F : TShFileOpStruct;
    sOrigen, sDestino : String;
  begin 
    Result := 0;
    sOrigen := Origen + #0;
    sDestino := Destino + #0;
 
    with F do 
    begin 
      Wnd   := Application.Handle;
      wFunc := FO_COPY;
      pFrom := @sOrigen[1];
      pTo   := @sDestino[1];
      fFlags := FOF_ALLOWUNDO or FOF_NOCONFIRMATION
    end; 
 
    Result := ShFileOperation(F);
end; 
 
begin 
  CopiaTodo('c:\Delphi3\*.*','c:\kk');
end;

Gracias de antemano

[ecfisa]

Hola DOS994.

int CopiaTodo(String Origen, String Destino)
{
  SHFILEOPSTRUCT FOS = {0};
  FOS.wFunc  = FO_COPY;
  FOS.pFrom  = (Origen+"\0").c_str();
  FOS.pTo    = (Destino+"\0").c_str();
  FOS.fFlags = FOF_ALLOWUNDO | FOF_NOCONFIRMATION;
  return SHFileOperation(&FOS);
}

Mas información: [SHFileOperation].

Saludos.