Private Sub Form_Load()
Me.Left = GetSetting(App.Title, "Settings", "MainLeft", 1000)
Me.Top = GetSetting(App.Title, "Settings", "MainTop", 1000)
Me.Width = GetSetting(App.Title, "Settings", "MainWidth", 6500)
Me.Height = GetSetting(App.Title, "Settings", "MainHeight", 6500)
.....................
End Sub
Private Sub Form_Unload(Cancel As Integer)
......................
If Me.WindowState <> vbMinimized Then
SaveSetting App.Title, "Settings", "MainLeft", Me.Left
SaveSetting App.Title, "Settings", "MainTop", Me.Top
SaveSetting App.Title, "Settings", "MainWidth", Me.Width
SaveSetting App.Title, "Settings", "MainHeight", Me.Height
End If
End Sub
Расположение окна
как сделать, чтобы windows запоминал расположение окон программы?
что бы в следующий раз программа не запускалась в исходном месте
и ещё один вопрос, тоже почти к теме: как сделать, чтобы windows запоминал какую папку я открывал в последний раз в окне открытия файла (СommonDialog)?
что бы в следующий раз программа не запускалась в исходном месте
и ещё один вопрос, тоже почти к теме: как сделать, чтобы windows запоминал какую папку я открывал в последний раз в окне открытия файла (СommonDialog)?
Windows этим заниматься не будет, все нужные параметры нужно сохранять и читать вручную, например с помощью GetSettings и SaveSetting:
например для главной формы
например для главной формы
Код:
спасибо ))
а это работает сразу с несколькими формами программы?
а это работает сразу с несколькими формами программы?
всё, я уже разобрался спс огромное!!!!