Instale o winzip no seu computador e use as seguintes sitxes para executar o 
winzip:

Exemplo de Compactação:
  WinExec(PChar('PkZip.exe '+ nomedoarquivo+'.zip '+pastaouarquivos),Sw_Show);

Exemplo de Descompactação:
  WinExec(PChar('PkunZip.exe -o '+arquivo.zip '+pastadedescompactação),Sw_Show);

Parâmetros do Winzip

 -a (adiciona arquivos)
 -r (incluir sub-diretorios)
 -d (deleta os arquivos após criar a cópia)
 -i (adiciona somente os arquivos alterados)
 -u (atualiza os arquivos)
 -s<senha> (usa uma senha para zipar e des-zipar)
 -e (extrai os arquivos no .ZIP)
 -d (restaura e cria a árvores de sub-diretorios que foi criada no .ZIP com -r)
 -min (executa em modo minimizado)

Espero que tenha ajudado.

Eduardo Campelo
  ----- Original Message ----- 
  From: Oséias Ferreira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 15, 2005 12:14 PM
  Subject: Re: [delphi-br] Re: Compactar arquivos


  -----BEGIN PGP SIGNED MESSAGE-----
  Hash: SHA1

  Tem sim.
  Dê uma olhada no freezip, que é um zip só com linha de comando.
  Você pode também usar a zlib compilada junto com sua app e compactar nos
  formatos gzip, ou bzip2, ou zip mesmo.

  http://www.zlib.org

  PS: Dê uma olhada que existe uma interface para Delphi.


  - --
  Oséias Ferreira.            oseiasferreira (arroba) yahoo.com.br
    Linux counter #333243
    GPG/PGP: 0x60084245
    fingerprint: B1A2 81EF 0560 66D3 8B22 1BC0 1CA6 0374 6008 4245

  -----BEGIN PGP SIGNATURE-----
  Comment: Using GnuPG with Thunderbird - http://enigmail.mozdev.org

  iD8DBQFDoXpYHKYDdGAIQkURAlQdAJ96jbnVctzDNKq76b9C8yVSYi8grACfY+9+
  kAQ8djjuuoZiPApelhpgGbU=
  =mrdh
  -----END PGP SIGNATURE-----

        

        
              
  _______________________________________________________ 
  Yahoo! doce lar. Faça do Yahoo! sua homepage. 
  http://br.yahoo.com/homepageset.html 



  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





        Yahoo! Grupos, um serviço oferecido por: 
              PUBLICIDADE
                
       


------------------------------------------------------------------------------
  Links do Yahoo! Grupos

    a.. Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/
      
    b.. Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]
      
    c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




------------------------------------------------------------------------------


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.371 / Virus Database: 267.13.13/200 - Release Date: 14/12/05


[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a