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

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

работа с реестром [D7, Win2k]

Dot ©   (2004-11-13 00:56:00) 

Мастера! Покажите код как на Апи изменить строчный параметр реестра.
допустим в таком разделе а\б\с\ изменить параметр Y ключа Х на блаблабла

---

Electric   (2004-11-18 12:18:00) [1]

Удалено модератором

---

XProger   (2004-11-17 01:29:00) [2]

Вот пример:

Procedure SaveSettings;
Var
 Key : hKey;
 Dummy : Integer;
Begin
 If RegCreateKeyEx(hKey_Current_User, 'Software\SilverStream\SSBoxes', 0, Nil, Reg_Option_Non_Volatile, Key_All_Access, Nil, Key, @Dummy) = Error_Success Then
 Begin
   RegSetValueEx(Key, 'RoundedRectangles', 0, Reg_Binary, @RoundedRectangles, SizeOf(Boolean));
   RegSetValueEx(Key, 'SolidColors', 0, Reg_Binary, @SolidColors, SizeOf(Boolean)); RegCloseKey(Key);
 End;
End;

Procedure LoadSettings;
Var
 Key : hKey;
 D1, D2 : Integer;
 Value : Boolean;
Begin
 If RegOpenKeyEx(hKey_Current_User, 'Software\SilverStream\SSBoxes', 0, Key_Read, Key) = Error_Success Then
 Begin
   D2 := SizeOf(Value);
   If RegQueryValueEx(Key, 'RoundedRectangles', Nil, @D1, @Value, @D2) = Error_Success Then RoundedRectangles := Value;
   If RegQueryValueEx(Key, 'SolidColors', Nil, @D1, @Value, @D2) = Error_Success Then SolidColors := Value;
   RegCloseKey(Key);
 End;
End;


---

Alex_Petr   (2004-11-16 22:55:00) [3]

Удалено модератором

---

Electric   (2004-11-16 15:47:00) [4]

Удалено модератором

---

Alex_Petr   (2004-11-16 12:59:00) [5]

Удалено модератором

---

Electric   (2004-11-16 10:47:00) [6]

Удалено модератором

---

Alex_Petr   (2004-11-13 03:32:00) [7]

"The RegSetValue function associates a value with a specified key. This value must be a text string and cannot have a name. This function is provided for compatibility with Windows version 3.1. Win32-based applications should use the RegSetValueEx function, which allows an application to set any number of named values of any data type."
Далее: RegSetValueEx + F1 - там все понятно

---

Dot   (2004-11-13 01:30:00) [8]

Да я в дельфи то плохо разбераюсь потому и прошу привести мне код именно готовый чтобы мне ег о скопировать и вставить в программу, вот как я сказал. вот то он должен делать + а Апи это все должно быть то есть проще говоря обясните мне синтаксис апи функции RegSetValue или как она там называется

---

Gero   (2004-11-13 01:06:00) [9]

> Dot   (13.11.04 01:03)

Повотрять мне не нужно, а тем более кричать.
У тебя Registry.pas нету?
Если нету, то могу тебя уверить, что вся работа с реестром там осуществляется именно с помощью WinAPI.

---

Dot   (2004-11-13 01:03:00) [10]

Для таких как Gero повторяю НА АПИ!!!!!!

---

Gero   (2004-11-13 00:58:00) [11]

TRegistry

---

Наверх