Buscar

Vereficar versão do programa online

Descrição do arquivo Criação do componente IdHTTP em runtime que verefica a versão pela web aonde é criado 1 arquivo .ini contendo a verão exemplo 1.0 no .ini e dentro do projeto uma variavel com a versão do software exemplo 0.9 então significa que a versão do .ini ´e maior que a variavel do executavel então força o cliente fazer o update do sistema. abaixo segue o codigo fonte em function. 1 - Passo inclua na uses IdHTTP 2 - Passo criando uma function function verifica_versao : string ; var web : TIdHTTP; vr_update, vr_software , vr_web : String; begin web := TIdHTTP.Create(nil); with web do begin vr_update := Get('http://www.kghost.com.br/update.ini'); vr_software := '0.9' ; vr_web := vr_update ; form1.web.Text := vr_web; form1.pr.Text := vr_software; if (vr_update > vr_software) then ShowMessage('Nova versão do software para baixar...'); Result := vr_update; end; end; 3 - Passo cria um button e coloque o seguinte codigo verifica_versao; Pronto somente isso espero ter gostado ! Visitem nosso site : www.kghost.com.br ou entre em contato via email ou msn ntnetx@hotmail.com Todos direitos reservado : André Luiz

Publicidade

Vote no arquivo




Quantidade de votos: 1 voto
Aceitação: 20%


Detalhes do arquivo

Área: Exemplos - Funções e rotinas
Tamanho: 226.85 KB / 0.22 MB
Adicionado dia: 24/06/10
Por: Andre
Visualizado: 5470 vezes
Baixado: 1883 vezes

Download do arquivo

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009