Questione : Comandi di Resiable, Windows

Ciao, il
I vuole generare un oggetto, una forma o un altro tipo di contenitore che posso disporre una barra di stato sopra con una maniglia della gru a benna per ridimensionare il contenitore.  Il contenitore avrà una barra di stato e un controllo della lista.  Voglio avere il contenitore resizable using la maniglia della gru a benna di barra di stato, ma non voglio il contenitore essere considerevole scattandomi sull'angolo di sinistra o giusto del containger (forma, pannello, ecc.) - io della parte superiore, non posso convincere alcun pannello per essere resizable using una barra di stato, o per quel resizabe della materia affatto.  Posso ottenerlo che funziona il senso che voglio mettendo una barra di stato su una forma, quindi riempiendo la forma di boxb della lista ma d'altra parte l'utente può ridimensionare la forma scattandosi sull'un bordo della forma (superiore, di sinistra, di destra).   in effetti, voglio un contenitore che ridimensionerà alla destra e giù, ma non dalla parte superiore o dal left.

I che prova al acccomplist una goccia giù combinata allora visualizza la casella di riepilogo con i vari valori in esso.  Spero che è chiaro, se non lasciarlo sanno…. class= del

Risposta : Comandi di Resiable, Windows

Impedire appena i valori della parte superiore e di parte di sinistra la pubblicazione come in questo esempio. Soltanto il bisogno del rapporto una certa registrazione, ma voi dovrebbe potere calcolare quello fuori.

Namespace WindowsFormsApplication2
      Codice categoria parziale pubblico Form1
            Eredita la forma
            MASSIMO di Const come numero intero = 800
            La parte di sinistra riservata come numero intero = 0, parte superiore come numero intero = 0, larghezza come numero intero = 0, altezza come numero intero = 0, deltaResize come numero intero = 0
            Riservato startResize come booleano = falso
            Nuovi secondari pubblici ()
                  InitializeComponent ()
            Sommergibile dell'estremità

            Sommergibile riservato Form1_ResizeEnd (mittente come oggetto, e come EventArgs)
                  Se Form1.ActiveForm.Left <> allora andasse
                        Form1.ActiveForm.Left = ha andato
                  Concluder se
                  Se parte superiore <> di Form1.ActiveForm.Top allora
                        Form1.ActiveForm.Top = parte superiore
                  Concluder se
                  Se Form1.ActiveForm.Width > MASSIMO allora
                        Form1.ActiveForm.Width = MASSIMO
                  Concluder se

                  Fioco formResize come il numero intero = larghezza - Form1.ActiveForm.Width
                  Oscurare ratioFormBar come singolo = MASSIMO/progressBar1.Width
                  Prova
                        progressBar1.Value = progressBar1.Value - CInt (Math.Floor (formResize /ratioFormBar))
                  Fermo
                        Se progressBar1.Value - CInt (Math.Floor (formResize /ratioFormBar)) <� 0="" Then="">                              progressBar1.Value = 0
                        Concluder se
                        Se progressBar1.Value - CInt (Math.Floor (formResize /ratioFormBar)) > MASSIMO allora
                              progressBar1.Value = MASSIMO
                        Concluder se
                  Concludere la prova
            Concludere il sommergibile

            Sommergibile riservato Form1_ResizeBegin (mittente come oggetto, e come EventArgs)
                  Se Form1.ActiveForm IsNot niente allora
                        parte di sinistra = Form1.ActiveForm.Left
                        parte superiore = Form1.ActiveForm.Top
                        larghezza = Form1.ActiveForm.Width
                        altezza = Form1.ActiveForm.Height
                  Concluder se
            Concludere il sommergibile

            Sommergibile riservato Form1_Activated (mittente come oggetto, e come EventArgs)
                  progressBar1.Value = Form1.ActiveForm.Left
                  progressBar1.Maximum = MASSIMO
                  larghezza = Form1.ActiveForm.Width
                  altezza = Form1.ActiveForm.Height

            Sommergibile dell'estremità

            Sommergibile riservato progressBar1_MouseDown (mittente come oggetto, e come MouseEventArgs)
                  Se e.Button = MouseButtons.Left allora
                        deltaResize = e.X
                        startResize = allineare
                  Concluder se
            Concludere il sommergibile

            Sommergibile riservato progressBar1_MouseUp (mittente come oggetto, e come MouseEventArgs)
                  Se e.Button = MouseButtons.Left AndAlso allora startResize
                        mouseMovement fioco come il numero intero = e.X - deltaResize
                        Oscurare ratioFormBar come singolo = MASSIMO/progressBar1.Width
                        Form1.ActiveForm.Width = Form1.ActiveForm.Width + CInt (Math.Floor (mouseMovement * ratioFormBar))
                        startResize = allineare
                  Concluder se

            Concludere il sommergibile
      Concludere il codice categoria
Concludere il namespace