Programa para Atualizar Executavel

[HoruS* 22]

Fala Galera blz ?

 

Vou mostrar A forma de montar um banco de dados ou de fazer o aplicativo que irá acessá-lo é muito particular de cada programador e não é objetivo deste artigo avaliar qual a melhor forma suas vantagens ou desvantagens. Eu particularmente prefiro trabalhar com pequenos executáveis que normalmente carregam o nome do setor que irá utilizar e tem somente as atividades, consultas e relatórios que ele pode acessar e ficam no computador do usuário para evitar tráfego desnecessário na rede.

 

O grande inconveniente que eu tinha era quando gerava uma versão nova do aplicativo tinha que ir de máquina em máquina atualizando, pois muitas vezes os discos não estão compartilhados por causa dos vírus e solicitar ao usuário fazer a atualização e nada é a mesma coisa.

 

Foi quando um dia, em na lista de discussão da Comunidade Firebird de Língua Portuguesa o grande Artur Anjos comentou sobre a forma que ele fazia para atualizar seus programas nos clientes via internet ao qual adaptei as minhas necessidades e implantei nos meus programas.

 

Tudo começa com a criação de um programa que eu chamarei de Atualizador ao qual o código segue abaixo:

 

program Atualizador;

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

O truque é que pegar este programa e colocar DENTRO do aplicativo como um resource. Para isto compile o atualizador e crie através de um editor de texto o arquivo Atualizador.** com o seguinte texto:

 

Atualizador exe "Atualizador.exe"

 

Depois através de linha de comando ou via arquivo bat execute o seguinte comando:

 

C:\brc32 -r Atualizador.**

 

Este comando gera o Atualizador.res (resource) que eu copio para a pasta onde estão os fontes do programa.

 

Agora é necessário definir uma condição para disparar a atualização. O Delphi tem em Project Options na aba Version Info selecionando a opção Auto-increment build number ao qual toda a vez que você der um build all o último número da versão (build) será incrementado gerando um número de versão maior que o anterior.

 

Para descobrir a versão utilizo a função VersaoEXE:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Para tornar o sistema flexível utiliezi um arquivo ini para definir o local onde serão colocados todos os aplicatios, local este onde eu copiaria as novas versões, como por exemplo:

Aplicativo.INI:

 

[outros]

 

versao='c:\pasta\aplicativo.exe'

 

Ou para acesso a rede Windows:

 

[outros]

 

versao='\\servidor\c\ pasta\aplicativo.exe'

 

Assim o .pas ficaria assim:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Para finalizar basta explicar como funciona a função CriaExeApartirdoResource como segue abaixo:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Como comentei no início cada um utiliza a técnica de programação de forma muito pessoal mas acredito que vocês possam alterá-las como eu fiz com a original feita por Erik Mendes e adatá-las a sua necessidade.

[-Aktsumi 36]

Nao consegui .-. =´(

 

Da pra fazer uma video aula?

[jgga20 2]

Faz uma video aula é meio complicado isso ai.

[iMelo~' 15]

Qual o erro de voces ? Eu ja fiz um atualização de executavel e foi , qualquer erro me avisem e irei ajudar.