Iniciando um programa sem colocá-lo no Iniciar

Utilizamos o registry do Windows.
Nas propriedades Globais do Aplicativo insira um source na seção After Global INCLUDE s.
!Definição do Registyry Class
INCLUDE(‘VSA_REG.INC’ )

Em seguida um source no embed Global Data
!Definição da Classe do registry do Windows
MeuRegistry vs]RegistryClass

Em uma janela de configuração, crie uma opção tipo: “ Iniciar programa na inicialização do Windows...”
Pode ser um controle do tipo check box. No embed do evento Accetpted, do controle (no caso check box) insira o seguinte source:
MeuRegistry.init(1) ! Constrói a instância
If checkbox = ‘ S’
MeuRegistry.Update(HKEY_CURRENT_USER, ‘Software\Microsoft\Windows\CurrentVersion\Run’,MeuAplicativo’,c:\aplictivo.exe’) ! cria o inicializador
Else
MeuRegistry.Remove (HKEY_CURRENT_USER,’Software\Microsoft\Windows\CurrentVersion\Run,’MeuAplicativo’) ! remove o inicializador.
End
MeuRegistry.Kill ! Destrói a instância
A estrutura dos diretórios pode variar(na maioria das vezes) mas os comandos são esses.
_________________
Julio César Pedroso é analista desenvolvedor Clarion. Programa em Clarion, Windev, c# e PlPgsql. Atualmente desenvolve projetos na empresa Pedroso Informática, www.pedrosoinformatica.com.br e trabalha com a ferramenta Visual Studio 2005

[pedrosao]

Utilizamos o registry do Windows.
Nas propriedades Globais do Aplicativo insira um source na seção After Global INCLUDE s.
!Definição do Registyry Class
INCLUDE(‘VSA_REG.INC’ )

Em seguida um source no embed Global Data
!Definição da Classe do registry do Windows
MeuRegistry vs]RegistryClass

Em uma janela de configuração, crie uma opção tipo: “ Iniciar programa na inicialização do Windows...”
Pode ser um controle do tipo check box. No embed do evento Accetpted, do controle (no caso check box) insira o seguinte source:
MeuRegistry.init(1) ! Constrói a instância
If checkbox = ‘ S’
MeuRegistry.Update(HKEY_CURRENT_USER, ‘Software\Microsoft\Windows\CurrentVersion\Run’,MeuAplicativo’,c:\aplictivo.exe’) ! cria o inicializador
Else
MeuRegistry.Remove (HKEY_CURRENT_USER,’Software\Microsoft\Windows\CurrentVersion\Run,’MeuAplicativo’) ! remove o inicializador.
End
MeuRegistry.Kill ! Destrói a instância
A estrutura dos diretórios pode variar(na maioria das vezes) mas os comandos são esses.
_________________
Julio César Pedroso é analista desenvolvedor Clarion. Programa em Clarion, Windev, c# e PlPgsql. Atualmente desenvolve projetos na empresa Pedroso Informática, www.pedrosoinformatica.com.br e trabalha com a ferramenta Visual Studio 2005