Intraweb como serviço Windows

Neste post vou mostrar como colocar o exe do Intraweb como serviço do Windows.

O Intraweb como serviço, não precisa que o servidor fique logado, pode se configurar tolerância a falhas e caso o servidor seja reiniciado será reativado automaticamente.

Como configurar o nome da Aplicação no Intraweb.

Na unit ServerController dentro do Object Inspector na propriedade APPName: Difina o nome do seu projeto da sua aplicação.

Vamos ao Código Intraweb.
Suponho que já esteja utilizando http.sys ao invés do Indy, o http.sys é um motor nativo do Windows que roda na camada abaixo da aplicação tornando seu projeto mais rapido mais eficiente.

No .dpr do seu projeto adicione este código ao fim do arquivo:

{$R *.res}

begin
  {$IFDEF DEBUG}
    TIWStartHSys.Execute (True);
  {$ELSE}
    TIWStartHSys.Execute (False);
  {$ENDIF}

end.

Vamos entender o que fizemos, com uma diretiva de compilação (Uma diretiva de compilação é um comentário com uma sintaxe especial, diferenciada, elas podem ser inseridas em qualquer lugar onde é permitido inserir comentários. Uma diretiva de compilação possui um $ logo após a abertura de chaves “{“ seguido do nome da diretiva e possivelmente de parâmetros, dependendo da diretiva.) quando executar a aplicação em modo Debug será exibida em modo console, ideal para debug do código, quando o projeto é copilado como Release será copiado como serviço do Windows com um exe mais enxuto ideal para colocar o projeto como Produção.

Com o exe compilado vamos instalar como serviço no Windows

Coloque o exe e seus arquivos na pasta no servidor com tudo no lugar e organizado vamos abrir o CMD aperte as teclas Bandeira do Windows + a letra R digite cmd e tecle ENTER.
Com o Prompt de Comando (interpretador de linha de comando no OS/2 e de sistemas baseados no Windows NT. Ele é um comando análogo ao command.com do MS-DOS e de sistemas Windows 9x, ou de shells utilizados pelos sistemas Unix.) aberto vamos instalar o exe como serviço, você precisa do nome do exe e o caminho aonde está, eu sou toda coisada como disse meu professor, todos projetos em ambiente Windows coloco em uma pasta chamada www, vou demonstrar neste contexto .

C:\www\meuprojeto\projeto1.exe -install 

Como gosto de escrever vou iniciar o executável por linha de comandos

net start "projeto1"

E como faço para parar um serviço via linha de comando?

net stop "projeto1" 

E para desinstalar o serviço:

C:\www\meuprojeto\projeto1.exe -Uninstall 

Pronto seu sistema já está instalado como serviço do Windows.

Acessando os serviços do Windows
Clique no menu iniciar e clicando em painel de controle, depois em ferramentas administrativas e escolha serviços outro caminho, Windows + R e digitando services. msc .

Escolha o serviço que acabamos de instalar e clique com botão direito do Mouse em Propriedades.

Na aba recuperação, vamos definir o que fazer quando a aplicação der erro parar.
Costumo usar da seguinte maneira:
– 1º Falha Reinicia o Serviço;
– 2º Falha Reinicia o Serviço;
– 3º Chama um programa; (este programa envia uma msg avisando que aplicação X parou sequencialmente pela terceira vez.).

Após configurar é só Clicar em Aplicar depois Ok.

Até +

Melissa