Criando Backup com o auxílio do Winzip

Fazer backup de arquivos ? o processo mais importante, pois em caso de problemas voc? n?o ter? um preju?zo t?o grande.
Nesse artigovou mostrar como fazer um pequeno sistema de backup, em poucas linhas de c?digo, buscando e gravando arquivos em um local determinado no c?digo-fonte.
Use os seus conhecimentos avan?ados para implementar essa dica no seu aplicativo ou criar um aplicativo capaz de fazer os backups.

Inicie um novo aplicativo e insira os seguintes componentes:

1Button

Antes de colocarmos o c?digo respons?vel pelo backup, ? necess?rio especificar em uses que usaremos uma API, para poder fazer o sistema funcionar. Coloque ent?o Shellapi dentro da cl?usula uses.

No evento OnClick do componente Button, coloque o seguinte c?digo:

ShellExecute(0,nil,'winzip32.EXE', '-a c:backup.zip C:*.txt',nil,sw_show);

Exit;

Entendendo o c?digo:

O comando ShellExecute tem a seguinte assinatura:

function ShellExecute(hWnd: HWND; Operation, FileName, Parameters, Directory: PChar; ShowCmd: Integer): HINST;

Onde:

hWnd: Handle da Janela que est? executando o Comando.
Operation: Tipo de opera??o que se quer executar. Pode ser 'open', 'print' ou 'explorer'
FileName: O arquivo que se quer abrir.
Parameters: Par?metros a serem passados para o FileName que vai ser aberto. Este par?metro ? ?til no caso de se passar no FileName o caminho de um execut?vel.
Directory: O diret?rio onde a aplica??o deve executar.
ShowCmd: indica o tipo de janela que deve ser aberta. Podemos utilizar por exemplo SW_HIDE (deixa a janela invis?vel), SW_MAXIMIZE (janela maximizada), SW_MINIMIZE (janela minimizada), SW_SHOWNORMAL (abre a janela restaurada e ativa).
Retorno: A fun??o possui erro quando o retorno ? menor ou igual a 32. Exemplos de erros que podem ser testados s?o ERROR_FILE_NOT_FOUND (arquivo n?o encontrado), ERROR_PATH_NOT_FOUND (caminho n?o encontrado), SE_ERR_ACCESSDENIED (o programa n?o tem direito para acessar o arquivo/programa requisitado), SE_ERR_ASSOCINCOMPLETE (arquivo requisitado n?o possui associa??o definida), SE_ERR_SHARE (Viola??o de Compartilhamento), entre outros erros que podem ser mapeados.