C# / VB.NET - [VB.NET] Ridimensionare con Form.BorderStyle = None

Salve a tutti,

ho un form con impostato BorderStyle = None e vorrei inserire una piccola immagine in basso a destra che consenta (in MouseDown) di ridimensionare il form.

Come potrei fare?

E' solo un'idea: potresti usare graphics.drawimage per ridisegnare quell'immagine con le dimensioni specificate

Senti non ti posso dare proprio un codice professionale per farlo, ma a me è venuta in mente una semplice idea

Private Sub PictureBox1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseClick
        Timer1.Stop()
        'Ferma il timer quando viene rilasciato il tasto
    End Sub

    Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown
        Timer1.Start()
    End Sub

    Private Sub PictureBox1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox1.MouseLeave
        Timer1.Stop()
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        'Prendono la posizione del mouse corrente X e Y
        Dim X = Control.MousePosition.X
        Dim Y = Control.MousePosition.Y
        Me.Size = New Size(X - Location.X + 5, Y - Location.Y + 5)
        'Ridimensiona la grandezza del form alla posizione del cursore, 
        'sottrae la sua distanza dal bordo dello schermo e in questo modo
        'individua il punto di fine del Form, e aggiunge 5 pixel per non 
        'far andare fuori il cursorse ma questo è solo un esempio, 
        'puoi cambiarlo come meglio vuoi
    End Sub

L'ho testato e funziona bene, e a dirla tutta mi è venuto in mente adesso, un po' di fantasia, dai Eheh