Form locatie opslaan

[softwareboy]

Dag beste helpmijers,

Ik heb een vraagje en ik hoop dat jullie mij hierbij kunnen helpen. Ik ben bezig met een programma en hierbij gebruik ik eigen form. Dus de Form wordt verplaatst zonder titelbalk. De code daarvoor heb ik dat is deze:

Public Class Form1
    Private Muis As Point

    Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown
        Me.Muis = New Point(-e.X, -e.Y)
    End Sub

    Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
        If e.Button = MouseButtons.Left Then
            Dim MuisPos As Point = Control.MousePosition
            MuisPos.Offset(Me.Muis.X, Me.Muis.Y)
            Location = MuisPos
        End If
    End Sub



End Class

Maar nu zou ik graag als ik mijn form helemaal rechts zet in de hoek of links en ik het programma afsluit en terug opstart dat hij het terugzet op die locatie.

Ik hoop dat jullie me kunnen helpen.

MvG Softwareboy

 

[C Windows]

Als je in het menu naar "Project" -> "*Projectnaam* Properties" gaat, klik je links op settings. Dan voeg je twee settings toe (x en y) met type integer. Als value zet je ze allebei bijvoorbeeld op 200.
Dan zet je dit in Form1_FormClosing:

 My.Settings.Y = Me.Location.Y
 My.Settings.X = Me.Location.X

En dit in je Form1_Load:

 Me.Location = New Point(My.Settings.X, My.Settings.Y)

Dit zou moeten werken

 

[softwareboy]

Heel erg bedankt!!! Dacht dat het ongeveer zoiets moest zijn .heb dan ook een beetje geprobeerd maar van die settings wist ik niet.

Heel erg bedankt kan nu terug verder doen.

MvG Softwareboy