Экспорт и импорт из реестра

Previous  Top  Next

    
 

reg-файлы это, как и ожидалось, формат, понимаемый и поддерживаемый сугубо программой regedit.

 

Командная строка у неё такая:

 

Импорт в реестр:

Code:

regedit RegData.reg

 

Экспорт из реестра:

 

Code:

regedit /e RegData.reg HKEY_LOCAL_MACHINE\Software\Microsoft\Windows

 

 

Если в параметрах встречаются пробелы, их ессно надо заключать в кавычки. Код в Delphi, который экспортирует ветвь реестра может быть например такой:

 

Code:

 

uses

ShellApi;

 

procedure TMain.ExportBtnClick(Sender: TObject);

var

FileName, Key: string;

begin

FileName := ... //çàïîëíèòü èìåíåì ôàéëà (ðàñøèðåíèå óêàçûâàòü)

Key := ... //çàïîëíèòü èìåíåì êëþ÷à, òèïà

//Key := 'HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion'

if ShellExecute(Handle, 'open', 'regedit.exe',

PChar(Format('/e "%s" "%s"', [FileName, Key])),

'', SW_SHOWDEFAULT) <= 32

then //åñëè îøèáêà, òî âîçâðàùàåìûé êîä <=32

   RaiseLastWin32Error();

end;

 

 

 

 

©Drkb::02298