Fórum Registro #163590
30/05/2003
0
Bom dia Pessoal,
Preciso informações que tem em uma chave do registro. Porém eu preciso ler todas as chaves que estão dentro desta. Ex.: Acesso esta chave: HKEY_LOCAL_MACHINE\Software\Microsoft\ e precido ler todas as subchaves que estão dentro dela. Como posso fazer isso?
Obrigado.
Preciso informações que tem em uma chave do registro. Porém eu preciso ler todas as chaves que estão dentro desta. Ex.: Acesso esta chave: HKEY_LOCAL_MACHINE\Software\Microsoft\ e precido ler todas as subchaves que estão dentro dela. Como posso fazer isso?
Obrigado.
Leocoden
Curtir tópico
+ 0
Responder
Posts
30/05/2003
Fred
procedure TfrmEntrada.LerReg(var Data: TDate);
var reg : TRegistry;
begin
reg := TRegistry.Create;
try
reg.RootKey := HKEY_CURRENT_USER;
if not (reg.OpenKey(´\Software\microsoft\´,false)) then
begin
existe := false;
exit;
end;
data := reg.ReadDate(´winsys´);//nome da chave
reg.CloseKey;
finally
reg.Free;
end;
end;
var reg : TRegistry;
begin
reg := TRegistry.Create;
try
reg.RootKey := HKEY_CURRENT_USER;
if not (reg.OpenKey(´\Software\microsoft\´,false)) then
begin
existe := false;
exit;
end;
data := reg.ReadDate(´winsys´);//nome da chave
reg.CloseKey;
finally
reg.Free;
end;
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)