Aeee Galera do script Brasil, sou novato por aqui e vi, procurando por ferramentas de busca na net que é o melhor lugar pra resolver sobre dúvidas, espero que me ajudem beleza? A dúvida é a seguinte: estou tentando fazer um módulo de backUp em meu sisteminha mas, gostaria de compactar a pasta DB (onde ficam minhas tabelas do Paradox), mas inteira. ... tipo, já sei como fazer com arquivos, mais ou menos assim: Insira zLib no Uses da sua Unit... procedure TForm1.CompressãoClick(Sender: TObject); var FileIni, FileOut: TFileStream; Zip: TCompressionStream; begin FileIni:=TFileStream.Create('C:\pasta\...arquivo a ser comprimido...', fmOpenRead and fmShareExclusive); FileOut:=TFileStream.Create('C:\pasta\...arquivo comprimido...', fmCreate or fmShareExclusive); Zip:=TCompressionStream.Create(clMax, FileOut); Zip.CopyFrom(FileIni, FileIni.Size); Zip.Free; FileOut.Free; FileIni.Free; end; mas n consigo compactar a PASTA DB. Aguardo respostas :D , vlw