[Delphi] Gerenciamento remoto de aplicativo

[Ryokusei 28]

Neste artigo irei ensinar como gerencia seu aplicativo remotamente com base num arquivo de texto hospedado em um servidor. Desta forma é possível, por exemplo, permitir a execução de seu aplicativo ou não.

 

Irei fazer da seguinte maneira:

 

- Terei um form que será a Splash Screen, onde irei verificar se o aplicativo pode ser executado ou não.

- Terei um form principal que será meu programa em si, somente para fins ilustrativos.

 

1 - Inicie um novo projeto no Delphi e enfeite seu Form1 (form principal) como quiser.

 

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

• Entre
• ou
• Cadastre-se

 

2 - Vá no menu "File/New/Form".

 

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

• Entre
• ou
• Cadastre-se

 

3 - Agora insira uma WebBrowser (paleta Internet) no Form e mova-o para uma parte em que não esteja visível no form. Altera a proprideda BorderStyle do Form2 para bsSingle, assim o usuário não irá poder redimensionar a janela e ver o WebBrowser, e também remove o biMaximize da propriedade BorderIcons.

 

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

• Entre
• ou
• Cadastre-se

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

• Entre
• ou
• Cadastre-se

 

4 - Insira um label no Form com Caption "Aguardando resposta do servidor...", e vá ao evento OnDocumentComplete do WebBrowser1.

 

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

• Entre
• ou
• Cadastre-se

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

• Entre
• ou
• Cadastre-se

 

5 - Insira o seguinte código agora:

 

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

• Entre
• ou
• Cadastre-se

 

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

• Entre
• ou
• Cadastre-se

 

6 - Agora dê dois cliques sobre o Form2 para ir ao evento OnCreate dele.

 

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

• Entre
• ou
• Cadastre-se

 

7 - Insira este código:

 

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

• Entre
• ou
• Cadastre-se

 

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

• Entre
• ou
• Cadastre-se

 

Você pode substituir "www.ryokusei1.xpg.com.br / permissao .txt" (sem aspas e espaços) pelo seu arquivo no seu servidor, eu usei um arquivo no meu servidor apenas para fins ilustrativos, este arquivo está com acesso liberado SEMPRE.

 

8 - Agora vá no menu "Project/View Source".

 

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

• Entre
• ou
• Cadastre-se

 

9 - Deve ter algo assim:

 

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

• Entre
• ou
• Cadastre-se

 

10 - Altere o código entre o begin e end para o seguinte:

 

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

• Entre
• ou
• Cadastre-se

 

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

• Entre
• ou
• Cadastre-se

 

11 - Agora rode o projeto e veja o resultado.

 

Se você não conseguiu fazer o projeto, abaixo está o link de download e scan do projeto pronto.

 

[DOWN]

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

• Entre
• ou
• Cadastre-se

[/DOWN]

[sENHA]

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

• Entre
• ou
• Cadastre-se

[/sENHA]

[Extreme pro 1]

Boa yuri até que em fim em demoro falo que era quarta que ia postar, postou 4 dias depois

 

nao fais mal ja ia mandar mp denovo

 

bom topico

ass: Lucas98

[lucas98 1]

Como disse na conta do Extreme

 

Otimo Topico Ja Fis o meu e vou testar agora vlw

 

@Edit

 

ops o meu fica dando asseco negado que que eu fasso

[~TnT Claw 0]

Lucas posta a linha do codigo que ta dando erro ae.

 

aH, LUCAS VC POIS DENTRO DO ARQUIVO Lá permissao.txt

a palavra

liberado

?

[tekitos123 3]

Como disse na conta do Extreme

 

Otimo Topico Ja Fis o meu e vou testar agora vlw

 

@Edit

 

ops o meu fica dando asseco negado que que eu fasso

 

 

pq vc tem q upar um arquivo .txt (a seu servidor) com o conteudo apenas a palavra 'liberado'

[Ryokusei 28]

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

• Entre
• ou
• Cadastre-se

 

No seu arquivo remoto, deixe o conteúdo dele apenas com o texto "liberado" (sem aspas).

 

Baixa o projeto e compila ele que você vai ver como funciona. No projeto de exemplo o acesso está liberado.

[SylvioTavares 0]

Você pode usar isso para variás coisas, pode usa para um gerenciador de Atualizações, de Status, de Permissões entre outros.

 

Muito boa sua iniciativa, ainda tem o download :p

 

Bom Tutor! :D

[DragonBoss 9]

boa cara, otimo tpc, eu nao tinha entendido mto bem, agora entendi, e jah to usando pra fazer um sistema de atualizaçao (usando download via ftp )

 

vlw ae

 

@Lucas98

 

pq usar 2 contas ? isso eh mult --'

[Ryokusei 28]

Obrigado pela gratidão de vocês, se tiverem alguma dúvida é só postar.

Alguns hosts (o xpg por exemplo) levam de 1 minuto a 48 horas pra processar arquivos upados/atualizados no server, levem isso em consideração ao utilizarem isso em seus aplicativos.

[fr0g 0]

@lucas98

primeiramente, se tu sonha em algum dia virar um programador aprenda primeiro a escrever o portugues.

porque pelo amor de Deus né cara "asseco" "fasso", ah santa paciencia!

 

e pelo tópico, muito bom!

aprendi muito :D

vlw