[CDR X5-X8] Работа с реестром

izrukvruki

Топикстартер
15 лет на форуме
Сообщения
1 839
Реакции
304

_MBK_

Пикирующий бомбардировщик
15 лет на форуме
Сообщения
33 197
Реакции
10 847
117667

117668
 
  • Спасибо
Реакции: izrukvruki

_MBK_

Пикирующий бомбардировщик
15 лет на форуме
Сообщения
33 197
Реакции
10 847

dastin

Некромант-любитель
12 лет на форуме
Сообщения
2 145
Реакции
2 043
... э-э ... не из вашего, а макроса по вашему запросу ... :)
обычно, я эти штуки всегда в макросах использую...
не очень нравится мне когда всегда по центру .
а формулировка
из вашего макроса
чтобы искать было ближе
 
  • Спасибо
Реакции: izrukvruki

Karatau

Участник
Сообщения
60
Реакции
22
Вот код, который я использую в своих макросах (в формах):

Private nameGroup As String
Private nameFolder As String

Private Sub Class_Initialize()
nameGroup = "nameMacros"
nameFolder = "savePosition"
End Sub

Private Sub UserForm_Activate()
Me.Left = GetSetting(nameGroup, nameFolder, "left", "0")
Me.Top = GetSetting(nameGroup, nameFolder, "top", "0")
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
SaveSetting nameGroup, nameFolder, "left", Me.Left
SaveSetting nameGroup, nameFolder, "top", Me.Top
End Sub
 
  • Спасибо
Реакции: izrukvruki

_MBK_

Пикирующий бомбардировщик
15 лет на форуме
Сообщения
33 197
Реакции
10 847
Только не надо забывать про привиллегии на доступ к реестру, которые в актуальных версиях могут ночить параноидальный характер