Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2017.01.15;
Скачать: [xml.tar.bz2];

Вниз

Чтение из HKEY_LOCAL_MACHINE правильно ли реализовано   Найти похожие ветки 

 
AlexeyTG ©   (2014-12-30 21:15) [0]

Решил в лаунчере о котором ранее писал сделать не в самом ЕХЕ, а из реестра брать значения. Пробный код выводящий значения мессейджем.

Просьба оценить правильно ли написана ф-я получения значений. ОС: х64

program Project1;

uses
 Winapi.Windows,System.SysUtils,Registry,Vcl.Dialogs;
Var
S1,S2:String;

{$R *.res}

function Reg (Const ReadS:String):string;
var
R:TRegistry;
begin
R:= TRegistry.Create;
Try
  R.RootKey := HKEY_LOCAL_MACHINE;
  R.Access := KEY_WOW64_64KEY or KEY_READ;
  if R.OpenKeyReadOnly("SOFTWARE\RunApp") then
   Begin
     Result:=R.ReadString(ReadS);
   End;
Finally
  R.Free;
End;
end;

begin
S1:=Reg("ID1");
S2:=Reg("ID2");
ShowMessage("ID1: "+S1+", ID2: "+S2);
end.


 
Rouse_ ©   (2014-12-30 21:30) [1]

Правильно


 
Rouse_ ©   (2014-12-30 21:36) [2]

За исключением что ключ доступа неверный, нужно key_wow32_64key использовать для 32 бит


 
AlexeyTG ©   (2014-12-31 15:42) [3]

Rouse_ Имеется ввиду KEY_WOW64_32KEY ?

С ним читает из раздела Wow6432Node на х64 системе и из нужного раздела на х32 системе :(

В текущем виде (KEY_WOW64_64KEY) читает из HKEY_LOCAL_MACHINE и работает как на х64 системе, так и на виртуалке с х32 Windows 7 читая из одного нужного раздела на обоих системах.

Т.е. не нужно с учетом разрядности ОС разные рег файлы делать



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2017.01.15;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.067 c
2-1421583719
Боб
2015-01-18 15:21
2017.01.15
Приостановка работы хука


15-1452558730
Сергей Суровцев
2016-01-12 03:32
2017.01.15
Appmethod слили


15-1435899159
Any
2015-07-03 07:52
2017.01.15
Где найти фрилансеров


15-1448477619
K-1000
2015-11-25 21:53
2017.01.15
MapViewOfFile() ускоряет загрузку файлов?


2-1428036109
Xmen
2015-04-03 07:41
2017.01.15
Работа с файлами которых имена в Unicode.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский