servis uygulamarı içinden registry işlemleri

[goabdullah]

Merhaba arkadaşlar,

bir servis uygulaması içinden registry' e ulaşıp yazmak ve okuma istiyorum. Kullanıcının Administrator yetkisi olması durumunda işlem yapabilir miyiz.
yoksa windows buna izin vermiyor mu ? (Normal uygulamarda registy işlemleri sorun olmuyor)

saygılar.

[esrehmaan]

procedure TMyTestServiceApp.ServiceAfterInstall(Sender: TService);
var
 Reg: TRegistry;
begin
 Reg := TRegistry.Create(KEY_READ or KEY_WRITE);
 try
   Reg.RootKey := HKEY_LOCAL_MACHINE;
   if Reg.OpenKey('\SYSTEM\CurrentControlSet\Services\' + Name, false) then
   begin
     Reg.WriteString('Description', 'This is a description for my fine Service Application.');
     Reg.CloseKey;
   end;
 finally
   Reg.Free;
 end;
end;

Böyle bişi buldum bi dener misin ?

[goabdullah]

(14-01-2017, Saat: 22:33)esrehmaan Adlı Kullanıcıdan Alıntı:

procedure TMyTestServiceApp.ServiceAfterInstall(Sender: TService);
var
 Reg: TRegistry;
begin
 Reg := TRegistry.Create(KEY_READ or KEY_WRITE);
 try
   Reg.RootKey := HKEY_LOCAL_MACHINE;
   if Reg.OpenKey('\SYSTEM\CurrentControlSet\Services\' + Name, false) then
   begin
     Reg.WriteString('Description', 'This is a description for my fine Service Application.');
     Reg.CloseKey;
   end;
 finally
   Reg.Free;
 end;
end;

Böyle bişi buldum bi dener misin ?

Evet HKEY_LOCAL_MACHINE erişebiliyoruz. 

Sorun yok.  Cevabınız için teşekkürler..