How to retrieve the size of a form from the registry so that the form size persists each time the application is loaded Uses GetSetting registry function.

Home » Registry » How to retrieve the size of a form from the registry so that the form size persists each time the application is loaded Uses GetSetting registry function.

How to retrieve the size of a form from the registry so that the form size persists each time the application is loaded Uses GetSetting registry function.

Posted on July 2, 2011

'Registry - How to retrieve the size of a form from the registry so that the form size persists each time the application is loaded Uses GetSetting registry function.
Private Sub Form_Load()
    Dim MyHeight As Integer, MyWidth As Integer
    MyHeight = GetSetting("TestRegistrySettings", "Startup", "Height", CStr(Screen.Height / 2))
    MyWidth = GetSetting("TestRegistrySettings", "Startup", "Width", CStr(Screen.Width / 2))
    Me.Height = MyHeight
    Me.Width = MyWidth
End Sub
 
Private Sub Form_Unload(Cancel As Integer)
    SaveSettings "TestRegistrySettings", "Startup", "Height", CStr(Me.Height)
    SaveSettings "TestRegistrySettings", "Startup", "Width", CStr(Me.Width)
End Sub