Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

dracom

Agir invisivel

Recommended Posts

Olá

Pessoal. Agora tenho outro probleminha.

Queria que um programa que criei se executase toda vez que o Windowns inicializace.

Alem disso gostaria que esse programinha agise impercepitivel (invisivel).

Dizem que é facil achar esse tipo de codigo na internet... mas eu nao achei.

Obrigado pela atenção

;)

Compartilhar este post


Link para o post
Compartilhar em outros sites

No caso você precisa que ele rode sem ser encontrado nos processos ?

Veja este link

Para colocar no inicializar, pode adicionar ele dentro do menu Iniciar ou então mexer no registro do windows criando a chave em:

HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run, pode fazer algo como:

 

procedure TfrmPrincipal.GravaRegWin(root: HKey; chave, valor, conteudo: string);
var
   reg: TRegistry;
   ins: boolean;
begin
{Grava um valor no registro do windows}
reg:=TRegistry.Create;
reg.RootKey:=root;
ins:=True;
reg.OpenKey(chave, True);
//verifica se o valor já existe e é o mesmo a inserir
if reg.ValueExists(valor) then
	if Reg.ReadString(valor) = conteudo then
		ins:=False;
if ins then
	reg.WriteString(valor, conteudo);
reg.CloseKey;
reg.Free;
end;

Função que grava um valor no registro do windows, para chamar pode fazer:

 

 

GravaRegWin(HKEY_LOCAL_MACHINE,'Software\Microsoft\Windows\CurrentVersion\Run','NomeApp',ExtractFileDir(Application.ExeName) + '\' + ExtractFileName(Application.ExeName));

Compartilhar este post


Link para o post
Compartilhar em outros sites

Eu estou usando isso

 

Registro := TRegistry.Create(KEY_WRITE); // Chama o construtor do objeto
  Registro.RootKey := HKEY_LOCAL_MACHINE; //Define a chave raiz
  Registro.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', True); //Cria a chave
  Registro.WriteString('WE','C:\WE'); //Grava o endereço da sua aplicação no Registro
  Registro.CloseKey; // Fecha a chave e o objeto
  Registro.Free;
Mas nenhuma chave é criada!

O que esta errado

Compartilhar este post


Link para o post
Compartilhar em outros sites

Eu estou usando isso

 

Registro := TRegistry.Create(KEY_WRITE); // Chama o construtor do objeto
  Registro.RootKey := HKEY_LOCAL_MACHINE; //Define a chave raiz
  Registro.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', True); //Cria a chave
  Registro.WriteString('WE','C:\WE'); //Grava o endereço da sua aplicação no Registro
  Registro.CloseKey; // Fecha a chave e o objeto
  Registro.Free;
Mas nenhuma chave é criada!

O que esta errado

 

Tente fazer usando a função acima...

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.