F�rum Copiar Arquivo com SHFileOperation #180918

09/09/2003

Ol� pessoal,
achei o c�digo abaixo no f�rum para copiar arquivos e adaptei ao meu aplicativo...
acontece que gostaria de copiar mais de um arquivo, e eles est�o em diret�rios diferentes.
tenho que repetir todo o c�digo para cada arquivo ou tem alguma forma de incluir mais de um arquivos no [i:5d6f12c9ac]pFrom[/i:5d6f12c9ac] ??? Ou ainda h� alguma outra maneira ???

var
  Dados: TSHFileOpStruct;
[b]........[/b]

with Dados do
begin
wFunc := FO_COPY;
pFrom := PChar(�C:\Teste.db�);
pTo := PChar(�d:\�);
fFlags:= FOF_ALLOWUNDO;
end;
SHFileOperation(Dados);

Rubensgalvanijr

Curtir t�pico

+ 0

Responder