Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> про ключ реестра, --- 
:(
    Опции темы
CABAL
  Дата 6.9.2004, 09:45 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Всем хай , у мя вот такая вот проблема : Предположим у Вас есть ключ реестра , вот он скажем на раб.столе лежит.Мне необходимо убрать сообщение которое выскакивает тогда когда я этот ключь открываю - "Вы действительно хотите добавить информацию из С:\......... в реестр? -да -нет ", вот подскажите как убрать простым способом.
  Вверх
RA
Дата 6.9.2004, 17:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Брутальный буратина
****


Профиль
Группа: Участник Клуба
Сообщений: 3497
Регистрация: 31.3.2002
Где: Лес

Репутация: 14
Всего: 115



Для этого нужно импортировать данные с какимто параметром, точно не помню с каким.

что то вроде "с:\MyData.reg /s" или "/o"
PM   Вверх
Pakshin A. S.
Дата 6.9.2004, 19:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 5056
Регистрация: 16.2.2003

Репутация: 21
Всего: 61



1) Если видётся работа из Delphi, то можно и самому запихнуть данные в реестр (класс TRegistry из uses Registry), пример работы с которым можно за несколько менут найти на форуме;

2) Если работа не ведётся из Delphi or Pascal, то имеет место нарушение правил форума, ибо вопрос не в тот раздел положен.

Это сообщение отредактировал(а) Pakshin A. S. - 6.9.2004, 19:47
PM   Вверх
Pakshin A. S.
Дата 6.9.2004, 20:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 5056
Регистрация: 16.2.2003

Репутация: 21
Всего: 61



Код

(*
Creates a subkey under the root key and loads registry information from a file into the newly created subkey.

Delphi syntax:

function LoadKey(const Key, FileName: String): Boolean;

C++ syntax:

bool __fastcall LoadKey(const AnsiString Key, const AnsiString FileName);

Description

Call LoadKey to:

1 Create a new subkey under the root key, and
2 Load registry information from a file into the subkey. Registry information can include data values, subkeys, and data values for those subkeys.

LoadKey is intended to simplify creation of a key, its values and subkeys, and the values for those subkeys in a single operation. A key, its subkeys, and all data values of the key and its subkeys is called a hive. Rather than creating each key and value separately, an application can read a hive from a file. This is especially useful for applications that users can reconfigure at run time.

Note: Before an application calls LoadKey, the RootKey property must be set to HKEY_USERS, HKEY_LOCAL_MACHINE, or to a key returned by a previous call to RegistryConnect.
*)

uses Registry;

// Load reg file...
procedure RegLoadFile(const filename:string);
var
  r:TRegistry;
  i:DWord;
begin
  if FileExists(filename)
   then
    begin
     r:=TRegistry.Create;
     try
      // Ïåðåáîð êëþ÷åé ðååñòðà
      for i:=HKEY_CLASSES_ROOT to HKEY_CURRENT_CONFIG do // íàäåþñü, ÷òî ýòî ïðàâîìåðíî
       begin
        r.RootKey:=i;
        r.LoadKey(''{?*}, filename) // !!!
       end
     except
      ShowMessage('Pakshin A. S. îïîçîðèëñÿ íà âåñü èíòåðíåò, ïðåäëîæèâ íåïðàâèëüíîå ðåøåíèå.' +#10 + #13 + '(ýòî ïðèìèíèìî, åñëè ôàéë åñòü ðååñòðà è ñ ôàéëîì ïðàâèëüíî ðàáîòàþò)') // :)))
     end;
     r.Free
    end
   else
    ShowMessage(filename + ' not found!')
end; // end of RegLoadFile

PM   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0619 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.