Dobrý den,
Měl bych otázku. Programuji v delphi a potřebuji kliknutím na tlačítko zkopírovat pevně zvolenou složku s podsložkami a soubory v těch podsložkách. Názvy se líší pouze u souborů (textového typu), kterých je ale mraky. Způsobem, jakým bych to udělal já to nepřipadá v úvahu, jelikož by byl hrozně složitý a dlouhý, musí existovat nějaký příkaz, kam zadám název složky-cestu (kterou chci kopírovat) a zkopíruji jí i s celým obsahem ... třeba na plochu...
Za rady velice děkuji...
0x
Zdáreček,
můžeš ve svém kódu použít podprogram na který budeš poukazovat a kde můžeš kopírovat strukturu adresářů včetně obsahu:
function CopyDirectory(WindowHandle: HWND; FilenameFrom: string; FilenameTo: string): Boolean;
var
SH: TSHFILEOPSTRUCT;
begin FillChar(SH, SizeOf(SH), 0);
with SH do
begin
Wnd := WindowHandle;
wFunc := FO_COPY;
pFrom := PChar(FilenameFrom + #0);
pTo := PChar(FilenameTo + #0);
fFlags := FOF_NOCONFIRMMKDIR or FOF_NOCONFIRMATION or FOF_SILENT or FOF_NOERRORUI;
end;
Result := SHFileOperation(SH) = 0;
Result := Result and (not SH.fAnyOperationsAborted);
end;
a nebo použít příkaz CopyFileEx; celý popis příkazu je zde:
Petr
Neneseme odpovědnost za správnost informací a za škodu vzniklou jejich využitím. Jednotlivé odpovědi vyjadřují názory jejich autorů a nemusí se shodovat s názorem provozovatele poradny Poradte.cz.
Používáním poradny vyjadřujete souhlas s personifikovanou reklamou, která pomáhá financovat tento server, děkujeme.