Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TRegistry.SaveKey - ??? [D6, Win2k]


Yaro ©   (2001-12-30 14:11:00) 

Люди, почему у меня экспорт из реестра в файл не получается! В чем здесь прикол?

Reg := TRegistry.Create;
Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.OpenKey("\SOFTWARE", True);
Reg.SaveKey("Mirabilis", filename);
Reg.CloseKey;
Reg.Free;

Помогите, очень надо!


Oleg Gashev   (2001-12-30 23:24:00) [1]

Ошибся ты. В OpenKey слеш не нужен.

var Reg:TRegistry;
begin
Reg:=TRegistry.Create;
Reg.RootKey:=HKEY_LOCAL_MACHINE;
Reg.OpenKey("Software",true);
Reg.SaveKey("Microsoft","C:\microsoft.txt");
Reg.CloseKey;
Reg.Free;
end;


Oleg Gashev   (2001-12-30 23:16:00) [2]

Ошибся. Не то написал. Excuse.


Oleg Gashev   (2001-12-30 23:11:00) [3]

Например:
Reg:=TRegINIFile.Create("");
Reg.RootKey:=HKey_Classes_Root;
Reg.WriteString(".ecw","","ECW Chess File");
Reg.WriteString("ECW Chess File","","Ecw Chess File");
Reg.WriteString("Ecw Chess File\DefaultIcon","",ParamStr(0)+",0");
Reg.WriteString("Ecw Chess File\Shell\Open\Command","","""+ParamStr(0)+"" "%1"");
Reg.Free;

Тот же принцип с TRegistry.


Yaro   (2001-12-30 23:03:00) [4]

Ну что, никто не поможет?


Наверх

Титульная страница Поиск, карта сайта Написать письмо