Работа с реестром

Язык Visual Basic на платформе .NET.

Модераторы: Ramzes, Sebas

mysorov
Начинающий
Начинающий
Аватара пользователя
 
Сообщения: 8
Зарегистрирован: 11.09.2006 (Пн) 8:06

Работа с реестром

Сообщение mysorov » 05.10.2006 (Чт) 7:47

подскажите, где найти информацию о работе с реестром в VB .Net 2005... :?:
это нужно для написания простенького редактора реестра... :?
заранее спасибо !
вот так...

Vinechka
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 381
Зарегистрирован: 10.05.2005 (Вт) 4:07
Откуда: Москва

Сообщение Vinechka » 05.10.2006 (Чт) 9:31

В MSDN по Microsoft.win32.Registry и т.д.
http://msdn2.microsoft.com/en-us/librar ... istry.aspx

gutorov
Начинающий
Начинающий
 
Сообщения: 5
Зарегистрирован: 20.11.2006 (Пн) 14:18

Сообщение gutorov » 21.11.2006 (Вт) 9:47

Так я записал
Private Sub Form1_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
'********************************************************************
' запишем в реестр всякую всячину
Dim regSave As Microsoft.Win32.RegistryKey
regSave = Microsoft.Win32.Registry.LocalMachine.CreateSubKey("software\Eastegger\Form")
' позиция на экране
regSave.SetValue("LocationX", Me.Location.X.ToString) ' LocationX
regSave.SetValue("LocationY", Me.Location.Y.ToString) ' LocationY
'Language
regSave.SetValue("Language", Language) 'Language

regSave.Close() ' закрываешь реестр после записи
'********************************************************************

End Sub


так считал

Private Sub Form1_Load(......................)
' здесь повытаскиваем из реестра то что нам нужно
Dim regLoad As Microsoft.Win32.RegistryKey
On Error Resume Next ' идем дальше, если этой ветки у нас нет
regLoad = Microsoft.Win32.Registry.LocalMachine.OpenSubKey("software\Eastegger\Form")
' а это загрузим форму в тоже место экрана, откуда она была выгружена
SetDesktopLocation(CType(regLoad.GetValue("LocationX"), Integer), (CType(regLoad.GetValue("LocationY"), Integer)))
' это вытащим язык
Language = regLoad.GetValue("Language")

On Error GoTo 0 ' перестаем идти дальше, если выскачит ошибка
regLoad.Close()

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Сообщение Viper » 21.11.2006 (Вт) 10:57

gutorov, это все к чему?
Весь мир матрица, а мы в нем потоки байтов!

gutorov
Начинающий
Начинающий
 
Сообщения: 5
Зарегистрирован: 20.11.2006 (Пн) 14:18

Сообщение gutorov » 21.11.2006 (Вт) 18:03

Обана, дико извиняюсь.... Действительно, что это на меня нашло... наверное обрадовался как все получилось :)

Ramzes
Скромный человек
Скромный человек
Аватара пользователя
 
Сообщения: 5004
Зарегистрирован: 12.04.2003 (Сб) 11:59
Откуда: Из гробницы :)

Сообщение Ramzes » 21.11.2006 (Вт) 18:12

:roll:


Вернуться в Visual Basic .NET

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 105

    TopList