Tüm Platformlar için Hızlı Uygulama Geliştirme Kitabı... Delphi

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
servis uygulamarı içinden registry işlemleri
#1
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.
Cevapla
#2
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 ?
Alıntı:
yarumdan ayrildum gözlerum nemli nemli 

rakı haramdur diye çay içtum demli demli...Heart 
Cevapla
#3
(14-01-2017, Saat: 22:33)esrehmaan Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
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..
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Web Servis Access Violation ahmet_sinav 6 134 Dün, Saat: 15:48
Son Yorum: ahmet_sinav
  delphi ile web servis yazmak. Kamuran Alpkaya 4 1.172 20-09-2018, Saat: 18:08
Son Yorum: Bay_Y
  Rest Web Servis Cookie Sıkıntısı Hk. satiuqea 7 201 31-08-2018, Saat: 17:36
Son Yorum: SimaWB
  Delphi içinden ve MSSQL üzerinden storeprocedure çalıştırma Bay_Y 6 251 30-08-2018, Saat: 13:10
Son Yorum: Bay_Y
  delphi içinden şablon çağırma murtishow76 13 676 29-06-2018, Saat: 13:00
Son Yorum: murtishow76



Konuyu Okuyanlar: 1 Ziyaretçi