Editar Regedit via Delphi

Delphi

29/06/2012

Gente, boa tarde.

Estou com o seguinte problema, tenho que rodar uma arquivo de configuração do regedit para ajustar o wallpaper que algumas vezes dá erro.

A rodina é essa:

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Desktop\Scheme]
Edit=
Display=


Em delphi coloquei um button e estou executando a seguinte rotina e não está funcionando:

procedure TForm1.BitBtn1Click(Sender: TObject);
var
FReg : TRegistry;
begin
try
FReg := TRegistry.Create( KEY_ALL_ACCESS );
FReg.RootKey := HKEY_CURRENT_USER;
if FReg.OpenKey(\Software\Microsoft\Internet Explorer\Desktop\Scheme, False ) then
begin
if FReg.KeyExists( Edit ) then
FReg.WriteString(Edit, )
else
begin
// Senão cria a chave e joga o valor
FReg.WriteString( Edit, );
end;
end;
// Finaliza a parte de inserção no registro do windows.
finally;
FReg.CloseKey;
FreeAndNil( FReg );
ShowMessage (Configurações aplicadas com sucesso.);
end;
end;

Alguma sugestão?
Fábio Sela

Fábio Sela

Curtidas 0

Respostas

Deivison Melo

Deivison Melo

29/06/2012

Pesquise por impersonificação!

Assim você dará privilêgios de usuários comuns acessarem o registro via sistema!

GOSTEI 0
POSTAR