|
ru.nethack
- RU.NETHACK -------------------------------------------------------------------
From : Shmirev Anton 2:5025/31.58 20 Dec 2000 22:56:54
To : Alexander Vasiliev
Subject : Создание ключей реестра
--------------------------------------------------------------------------------
С сервака ФСБ группа YCH увела инфу о том, что Пятница Декабрь 08 2000 08:30,
Alexander Vasiliev писал Dennis Erokhin:
DE>> ключи cоздaютcя 3) нaброcaл прогу, cоздaющую те же ключи.
AV> А подробнее о программе можно.
Это элементарно, Ватсон! Я ХЗ, о каких ключах говорилось в предыдущей мессаге,
но основы работы с реестром распишу (вкратце)
>DELPHI:
uses registry;
.
.
.
procedure tform1.reestr;
var r:tregistry;
begin
r:=tregistry.create;
r.rootkey:=hkey_local_machine; //самый интересный ключ
r.openkey('software\microsoft\windows\currentversion\policies\explorer',true);
{это мы открыли ключ, указаный первым параметром. Второй параметр означает -
создать такой ключ, если его нету. В случае false ключ создан не будет}
if r.readstring('Параметр реестра') <> 'че те надо' then
r.writestring('Параметр реестра', 'че те надо');
{Hу, тут мы прочли строковый параметр с названием 'Параметр реестра', а затем в
этот параметр записали значение 'че те надо'}
r.free;
end;
C уважением, Shmirev Anton.
... 0cdh 19h
--- Я люблю людей! UNREG
* Origin: Обнаружено новое устройство: юзер. Установить драйвер (2:5025/31.58)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
