Fórum Alterar remotamente o Registro do win98 #214983
17/02/2004
0
- Estou procurando uma rotina que me permita acessar o registro de um
determinado micro na rede.
- Achei um bom exemplo no delphibr intitulado ´´Conexão de registros
atravez da rede windows´´ o autor é o Samuel Cunha.
- O problema é que esse exemplo só funciona com o W95 e WNT.
Vcs teriam como me auxiliar a encontrar uma rotina que acesse as
outras plataformas (W98, WME, W2000)?
sds
Marco Aurelio
Marcoac
Curtir tópico
+ 0Posts
18/02/2004
Maicongabriel
Pergunto isto, pq API´s do 95 praticamente 100¬ continuam a existir no 98, assim como 2000 e XP são de base NT e deveriam manter a mesma compatibilidade com a linha NT! :wink:
Gostei + 0
18/02/2004
Aroldo Zanela
A que registro se refere? É o registro do Windows? Alguma manipulação de banco de dados?
Por favor, explica isso melhor.
Gostei + 0
18/02/2004
Marcoac
Infelizmente não é por citação do Autor que não funciona. Tentei em vários Windows (98,NT,MT,XP e 2000) e não funciona mesmo.
Também achei que funcionaria no Windows 98 visto que a estrutura do Regedit é praticamente a mesma.
Tenho que acessar do servidor o Registro de máquinas na rede;
Abaixo segue a rotina:
procedure Iniciar(Maquina, Titulo, Programa: string); var Registry : TRegistry; begin Registry := TRegistry.Create; try if Maquina <> ´´ then begin Registry.RootKey := HKEY_LOCAL_MACHINE; [b] Registry.RegistryConnect(Maquina);[/b] Registry.OpenKey(´\Software\Microsoft\Windows\CurrentVersion\Run´,False); Registry.WriteString(Titulo,Programa); Registry.CloseKey; end else begin Registry.RootKey := HKEY_LOCAL_MACHINE; Registry.OpenKey(´\Software\Microsoft\Windows\CurrentVersion\Run´,False); Registry.WriteString(Titulo,Programa); Registry.CloseKey; end; finally Registry.Free; end; end;
//- - - - - - - - - - - -
Iniciar(´\\Next´,´RegistryInNet´,´c:\sistema\teste.exe´);
//- - - - - - - - - - - -
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)