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

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 5/5 - 2 oy
  • 1
  • 2
  • 3
  • 4
  • 5
TRegistry İşlemleri
#1
Merhaba,
32 bit olarak derlenmiş uygulama ile "SOFTWARE\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION" dizininden veri okuyamıyorum. Okumak istediğimde "Wow6432Node" deki kayıda yönlendiriyor beni.

Bunu okumanın bir yolu var mıdır ? 

function TForm2.GetRegedit(Name: string): string;
var
 Reg: TRegistry;
begin
 try
   Reg := TRegistry.Create;
   try
     Reg.RootKey := HKEY_LOCAL_MACHINE;
     Reg.OpenKey
       ('SOFTWARE\Wow6432Node\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION',
       true);
     Result := inttostr(Reg.ReadInteger(Name));
     Reg.CloseKey;

   finally
     Reg.Free;
   end;
 except
   on E: Exception do
     ShowMessage('Programı Yönetici Olarak Çalıştırın.')
 end;
end;

function TForm2.GetRegedit64(Name: string): string;
var
 Reg: TRegistry;
begin
 try
   Reg := TRegistry.Create;
   try
     Reg.RootKey := HKEY_LOCAL_MACHINE;
     Reg.OpenKey
       ('SOFTWARE\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION',
       true);
     Result := inttostr(Reg.ReadInteger(Name));
     Reg.CloseKey;
   finally
     Reg.Free;
   end;
 except
   on E: Exception do
     ShowMessage('Programı Yönetici Olarak Çalıştırın.')
 end;
end;
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla
#2
Merhaba, 
Aşağıda ki gibi bir değişiklik ile probleminiz çözülebilir.

Reg := TRegistry.Create(KEY_READ or KEY_WOW64_64KEY);
Amatör Küme Bilgisayar Programcısı
WWW
Cevapla
#3
(29-09-2016, Saat: 13:46)barutali Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlMerhaba, 
Aşağıda ki gibi bir değişiklik ile probleminiz çözülebilir.
Reg := TRegistry.Create(KEY_READ or KEY_WOW64_64KEY);

Adamsın.
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla
#4
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol API'si de işinize yarayabilir Wink
Mal sahibi, mülk sahibi
Hani bunun ilk sahibi ?
Mal da yalan mülk de yalan
Var biraz da sen oyalan...
WWW
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  TRegistry hk, yhackup 2 287 31-01-2017, Saat: 14:23
Son Yorum: yhackup
  servis uygulamarı içinden registry işlemleri goabdullah 2 401 16-01-2017, Saat: 00:47
Son Yorum: goabdullah



Konuyu Okuyanlar: 1 Ziyaretçi