Procurar no Registro.
09/12/2003
0
Estou precisando descobrir o host da máquina.
Mas não estou conseguindo, então estou tentando buscar direto no registro.
Mas não sei direito como fazer isso então la vai:
Preciso buscar o valor da seguinte chave,
HKEY_LOCAL_MACHINE
SYSTEM/ControlSet001/Services/Tcpip/Parameters
na pasta parameters preciso buscar o que tiver escrito na chave HostName
Mas não estou conseguindo escrever o código.
Se alguém puder me ajudar, agradeço muito.
Mas não estou conseguindo, então estou tentando buscar direto no registro.
Mas não sei direito como fazer isso então la vai:
Preciso buscar o valor da seguinte chave,
HKEY_LOCAL_MACHINE
SYSTEM/ControlSet001/Services/Tcpip/Parameters
na pasta parameters preciso buscar o que tiver escrito na chave HostName
Mas não estou conseguindo escrever o código.
Se alguém puder me ajudar, agradeço muito.
Latrodectrus
Curtir tópico
+ 0
Responder
Posts
09/12/2003
Denis
Declare na Uses a unit Registry : Uses Registry;
use o bloco de programa para ler a chave :
var
Registry: TRegistry;
S: string;
//-------------
Registry:=TRegistry.Create;
Registry.RootKey:=HKEY_LOCAL_MACHINE;
Registry.OpenKey(´SYSTEM/ControlSet001/Services/Tcpip/Parameters´,False);
S :=Registry.ReadString(´HostName´);
Registry.Free;
Showmessage(s);
use o bloco de programa para ler a chave :
var
Registry: TRegistry;
S: string;
//-------------
Registry:=TRegistry.Create;
Registry.RootKey:=HKEY_LOCAL_MACHINE;
Registry.OpenKey(´SYSTEM/ControlSet001/Services/Tcpip/Parameters´,False);
S :=Registry.ReadString(´HostName´);
Registry.Free;
Showmessage(s);
Responder
Clique aqui para fazer login e interagir na Comunidade :)