Form Resize doesnt repaint

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   When my forms are Skinned and I try to stop a user from resizing a form smaller that I want the borders of the form disappear until you move the form.

this is my code:

Private Sub Form_Resize()
  If Me.Width < 4000 Then
    Me.Width = 4000
    Exit Sub 
  End If

  If Me.Height < 3000 Then
    Me.Height = 3000
    Exit Sub  
  End If
End Sub

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
aelsmore Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 27 July 2009 Status: Offline Points: 3	Post Options Post Reply Quote aelsmore Report Post Thanks(0) Quote Reply Topic: Form Resize doesnt repaint Posted: 27 July 2009 at 8:07am
	When my forms are Skinned and I try to stop a user from resizing a form smaller that I want the borders of the form disappear until you move the form. this is my code: Private Sub Form_Resize() If Me.Width < 4000 Then Me.Width = 4000 Exit Sub End If If Me.Height < 3000 Then Me.Height = 3000 Exit Sub End If End Sub

Baldur Members Profile Send Private Message Find Members Posts Add to Buddy List Senior Member Joined: 22 November 2006 Location: Germany Status: Offline Points: 244	Post Options Post Reply Quote Baldur Report Post Thanks(0) Quote Reply Posted: 05 September 2009 at 10:01am
	Use the Resizer-Control instead to prevent wrong resizing, you have than to do nothing. In VB6 change the ScaleMode to Pixels before using Resizer.