Procurar no Registro.

09/12/2003

1

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.


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);


Responder