Egy könyvtárat és teljes tartalmát az alábbi módon lehet átmásolni egy adott helyre:
implementation
uses ShellAPI;

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var
FOS :TSHFileOpStruct;
begin
with FOS do begin
Wnd := Self.Handle;
wFunc := FO_COPY; //Másolás
pFrom := 'c:\idapi\*.*'; //Honnan, mely fájlokat?
pTo := 'c:\proba'; //Hová? (célkönyvtár)
fFlags := FOF_NoConfirmMkDir; //Kérdés nélkül létrehozza
end; //az új (cél)könyvtárat.
SHFileOperation(FOS);
end;

Ha a könyvtárat és tartalmát nem másolni, hanem áthelyezni szeretnéd, akkor a FO_COPY helyett
FO_MOVE beállítást kell használnod.