Question : Commandes de Resiable, Windows

Bonjour, le
I veulent créer un objet, une forme ou un type différent de récipient que je peux placer une barre de statut dessus avec une poignée d'encavateur pour remettre à la côte le récipient.  Le récipient aura une barre de statut et une commande de liste.  Je veux avoir le récipient resizable using la poignée d'encavateur de barre de statut, mais je ne veux pas que le récipient soit considérable en cliquant sur le coin de dessus, gauche ou bon du containger (forme, panneau, etc.) - je ne peux obtenir aucun panneau pour être resizable using une barre de statut, ou pour ce resizabe de matière du tout.  Je peux l'obtenir fonctionnant la manière que je veux en mettant une barre de statut sur une forme, puis remplissant forme de boxb de liste mais d'autre part l'utilisateur peut remettre à la côte la forme en cliquant sur un bord de la forme (supérieur, gauche, droit).   en effet, je veux un récipient qui remettra à la côte vers la droite et vers le bas, mais pas à partir du dessus ou du left.

I AM essayant à l'acccomplist une baisse vers le bas combinée montre alors la boîte de liste avec de diverses valeurs dans elle.  J'espère qui est clair, sinon me laisser sait…. class= de

Réponse : Commandes de Resiable, Windows

Empêcher juste les valeurs de gauche et de dessus d'être éditée comme dans cet exemple. Seulement le besoin du rapport l'ajustement, mais vous devrait pouvoir figurer cela dehors.

Namespace WindowsFormsApplication2
      Classe partielle publique Form1
            Hérite de la forme
            MAXIMUM de Const comme nombre entier = 800
            La gauche privée comme nombre entier = 0, dessus comme nombre entier = 0, largeur comme nombre entier = 0, taille comme nombre entier = 0, deltaResize comme nombre entier = 0
            Privé startResize comme booléen = faux
            Nouveaux secondaires publics ()
                  InitializeComponent ()
            Sous-marin d'extrémité

            Sous-marin privé Form1_ResizeEnd (expéditeur comme objet, e comme EventArgs)
                  Si Form1.ActiveForm.Left <> partait alors
                        Form1.ActiveForm.Left = est parti
                  Finir si
                  Si dessus <> de Form1.ActiveForm.Top alors
                        Form1.ActiveForm.Top = dessus
                  Finir si
                  Si Form1.ActiveForm.Width > puis MAXIMUM
                        Form1.ActiveForm.Width = MAXIMUM
                  Finir si

                  Faible formResize comme nombre entier = largeur - Form1.ActiveForm.Width
                  Obscurcir ratioFormBar en tant que simple = le MAXIMUM/progressBar1.Width
                  Essai
                        progressBar1.Value = progressBar1.Value - CInt (Math.Floor (formResize /ratioFormBar))
                  Crochet
                        Si progressBar1.Value - CInt (Math.Floor (formResize /ratioFormBar)) <� 0="" Then="">                              progressBar1.Value = 0
                        Finir si
                        Si progressBar1.Value - CInt (Math.Floor (formResize /ratioFormBar)) > MAXIMUM alors
                              progressBar1.Value = MAXIMUM
                        Finir si
                  Finir l'essai
            Finir le sous-marin

            Sous-marin privé Form1_ResizeBegin (expéditeur comme objet, e comme EventArgs)
                  Si Form1.ActiveForm IsNot rien alors
                        gauche = Form1.ActiveForm.Left
                        dessus = Form1.ActiveForm.Top
                        largeur = Form1.ActiveForm.Width
                        taille = Form1.ActiveForm.Height
                  Finir si
            Finir le sous-marin

            Sous-marin privé Form1_Activated (expéditeur comme objet, e comme EventArgs)
                  progressBar1.Value = Form1.ActiveForm.Left
                  progressBar1.Maximum = MAXIMUM
                  largeur = Form1.ActiveForm.Width
                  taille = Form1.ActiveForm.Height

            Sous-marin d'extrémité

            Sous-marin privé progressBar1_MouseDown (expéditeur comme objet, e comme MouseEventArgs)
                  Si e.Button = puis MouseButtons.Left
                        deltaResize = e.X
                        startResize = rectifier
                  Finir si
            Finir le sous-marin

            Sous-marin privé progressBar1_MouseUp (expéditeur comme objet, e comme MouseEventArgs)
                  Si e.Button = MouseButtons.Left AndAlso startResize alors
                        Faible mouseMovement comme nombre entier = e.X - deltaResize
                        Obscurcir ratioFormBar en tant que simple = le MAXIMUM/progressBar1.Width
                        Form1.ActiveForm.Width = Form1.ActiveForm.Width + CInt (Math.Floor (mouseMovement * ratioFormBar))
                        startResize = rectifier
                  Finir si

            Finir le sous-marin
      Finir la classe
Finir le namespace