|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Не идет запись в ветку реестра(
Не идет запись значения в ветку реестра( Пытаюсь дописать так:
var ... value:=1; Код:
RegOpenKeyEx(HKEY_LOCAL_MACHINE, 'Software\Microsoft\Windows\CurrentVersion\Uninstall\Program', 0, KEY_ALL_ACCESS, RegResult); RegSetValueEx(RegResult, PChar('SystemComponent'), 0, REG_DWORD,value , 255); |
#2
|
|||
|
|||
..............
|
#3
|
|||
|
|||
Ну что, никто не поможет?(
|
#4
|
||||
|
||||
прав наверно нет, попробуйте заменить ключ KEY_ALL_ACCESS
Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#5
|
||||
|
||||
а не проще так?:
Код:
uses Registry; var R :TRegistry; begin try R:=TRegistry.Create; R.RootKey:=HKEY_LOCAL_MACHINE; R.OpenKey('путь в реестре',True); R.WriteString('имя параметра','значение'); R.CloseKey; Except R.Free; end; end; Поживу - увижу, Доживу - узнаю, Выживу - учту. [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|
#6
|
|||
|
|||
В том то и дело, что нужно именно на API(
|
#7
|
||||
|
||||
права доступа меняли? что возвращает функция?
Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#8
|
|||
|
|||
Главное запись таких параметров как UninstallString, DisplayIcon и др. идет, а вот параметра SystemComponent - нет. Права менял тоже самое.
|