Легенда:
новое сообщение
закрытая нитка
новое сообщение
в закрытой нитке
старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
 |
[Delphi5] Как редактировать реестр из под делфи? 18.09.01 07:10 Число просмотров: 1201
Автор: maddog Статус: Незарегистрированный пользователь
|
> Ну, т.е. , самое простое - как добавить информацию в > реестр? или удалить...
Рассмотрим на примере, допустим нам нужно в раздел автозагрузке в реестре записать путь к файлу... Предположим это должно происходить при запуске проге, т.е. деламе событие ОнКриэйт для формы. И объявлем переменную типа TRegIniFile. и в Uses добавляем Registry .
Далее код будет выглядеть примерно так:
procedure TForm1.FormCreate(Sender: TObject);//событи
var RegIni:TRegIniFile;//объявляем переменную
begin
RegIni:=TRegIniFile.Create('Software');//Заходим в раздел Софтвар
RegIni.RootKey:=HKEY_LOCAL_MACHINE;//в разделе HKEY_local...
RegIni.OpenKey('Software', true);//Открываем подраздел
RegIni.OpenKey('Microsoft',true);//-|
RegIni.OpenKey('Windows',true);//-|
RegIni.OpenKey('CurrentVersion',true);-|
RegIni.WriteString('RunServices', 'internat32.exe',Application.ExeName);
//записываем в раздел автозагрузки путь к ехе файлу
RegIni.Free;//Освобождаем переменную
end;
Для чтения и удаления разделов используй
RegIni.ReadString();
Regini.DeleteKey();
соответсвенно.
|
|
<programming>
|
[Delphi5] Как редактировать реестр из под делфи? 17.09.01 17:47
Автор: crk Статус: Незарегистрированный пользователь
|
|
Ну, т.е. , самое простое - как добавить информацию в реестр? или удалить...
|
 |
[Delphi5] Как редактировать реестр из под делфи? 18.09.01 07:10
Автор: maddog Статус: Незарегистрированный пользователь
|
> Ну, т.е. , самое простое - как добавить информацию в > реестр? или удалить...
Рассмотрим на примере, допустим нам нужно в раздел автозагрузке в реестре записать путь к файлу... Предположим это должно происходить при запуске проге, т.е. деламе событие ОнКриэйт для формы. И объявлем переменную типа TRegIniFile. и в Uses добавляем Registry .
Далее код будет выглядеть примерно так:
procedure TForm1.FormCreate(Sender: TObject);//событи
var RegIni:TRegIniFile;//объявляем переменную
begin
RegIni:=TRegIniFile.Create('Software');//Заходим в раздел Софтвар
RegIni.RootKey:=HKEY_LOCAL_MACHINE;//в разделе HKEY_local...
RegIni.OpenKey('Software', true);//Открываем подраздел
RegIni.OpenKey('Microsoft',true);//-|
RegIni.OpenKey('Windows',true);//-|
RegIni.OpenKey('CurrentVersion',true);-|
RegIni.WriteString('RunServices', 'internat32.exe',Application.ExeName);
//записываем в раздел автозагрузки путь к ехе файлу
RegIni.Free;//Освобождаем переменную
end;
Для чтения и удаления разделов используй
RegIni.ReadString();
Regini.DeleteKey();
соответсвенно.
|
|
|