none
Ajuda com Forms RRS feed

  • Pergunta

  • Ola,

    Estou querendo saber como eu faço para eu o form2 só pode ficar dentro da janela do form1,o form2 não pode sair da janela form1.IComo que eu faço isso?

    quarta-feira, 18 de março de 2015 02:02

Respostas

  • Olá, amigo.
    Outra sugestão é apenas alterar a Propriedade "TopMost" do seu  Form2, para "True" que possibilitará dele não sair da janela principal ("Form1")

    TopMost=True

    E mais uma dica, se , no caso do seu  "Form1" for Maximizado, de direcionar o Form2 para cima do Relógio do Windows. É só inserir no evento "Load" do "Form2" este código:

    Caso desejar converter em "C#" aqui está o site muito legal! http://converter.telerik.com/


        

    Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load

            'Sugetão para caso o "Form1" for Maximizado de direcionar o Form2 para cima do Relógio do Windows

            Me.Top = 200

            Me.Left = ((Screen.PrimaryScreen.WorkingArea.Width - Me.Width))

            Me.Top = ((Screen.PrimaryScreen.WorkingArea.Height - Me.Height))

            Me.Refresh()

     

        End Sub

    Aqui está de como fica com este código:

    Form2 por sobre o Form1

    Espero ter contribuído. Abraço!


    MS INFORMATICA - Projeto Marinner: Operating System Interface - Marinnner 5 Release Edition


    quarta-feira, 18 de março de 2015 06:41
  • Olá oMaxiMos, blz?

    Você precisa setar seu form "pai" como mdiPArent, é bem simples. Vou te passar alguns links que vão te ajudar, veja:

    How to open child forms positioned within MDI parent in VB.NET?

    How to: Create MDI Child Forms

    VB.NET - Programas com Interface MDI


    Wennder Santos

    Se solucionou seu problema ou dúvida, não esqueça de marcar como resposta. Se foi util, não esqueça de marcar como util.


    quarta-feira, 18 de março de 2015 03:28

Todas as Respostas

  • Olá oMaxiMos, blz?

    Você precisa setar seu form "pai" como mdiPArent, é bem simples. Vou te passar alguns links que vão te ajudar, veja:

    How to open child forms positioned within MDI parent in VB.NET?

    How to: Create MDI Child Forms

    VB.NET - Programas com Interface MDI


    Wennder Santos

    Se solucionou seu problema ou dúvida, não esqueça de marcar como resposta. Se foi util, não esqueça de marcar como util.


    quarta-feira, 18 de março de 2015 03:28
  • Olá, amigo.
    Outra sugestão é apenas alterar a Propriedade "TopMost" do seu  Form2, para "True" que possibilitará dele não sair da janela principal ("Form1")

    TopMost=True

    E mais uma dica, se , no caso do seu  "Form1" for Maximizado, de direcionar o Form2 para cima do Relógio do Windows. É só inserir no evento "Load" do "Form2" este código:

    Caso desejar converter em "C#" aqui está o site muito legal! http://converter.telerik.com/


        

    Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load

            'Sugetão para caso o "Form1" for Maximizado de direcionar o Form2 para cima do Relógio do Windows

            Me.Top = 200

            Me.Left = ((Screen.PrimaryScreen.WorkingArea.Width - Me.Width))

            Me.Top = ((Screen.PrimaryScreen.WorkingArea.Height - Me.Height))

            Me.Refresh()

     

        End Sub

    Aqui está de como fica com este código:

    Form2 por sobre o Form1

    Espero ter contribuído. Abraço!


    MS INFORMATICA - Projeto Marinner: Operating System Interface - Marinnner 5 Release Edition


    quarta-feira, 18 de março de 2015 06:41
  • Blzinha Wennder Santos,

    Eu peguei isso código :

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Dim NewForm As System.Windows.Forms.Form
            NewForm = New System.Windows.Forms.Form
            'USE THE NEXT LINE - to add an existing CUSTOM form you already have
            'NewForm = Form7                         
            NewForm.Width = 400
            NewForm.Height = 250
            NewForm.MdiParent = Me
            NewForm.Text = "CAPTION"
            NewForm.Show()
            'DockChildForm(NewForm, "left")          'dock left
            'DockChildForm(NewForm, "right")         'dock right
            'DockChildForm(NewForm, "top")           'dock top
            'DockChildForm(NewForm, "bottom")        'doc bottom
            'DockChildForm(NewForm, "full")          'fill the client area (maximise the child INSIDE the parent)
            'DockChild

    Quero saber também  como que eu faco para quando eu coloco o form meio que sando do form principal ele não ativa o barra de rolagem.

     

    quarta-feira, 18 de março de 2015 18:19
  • Blzinha Wennder Santos,

    Eu peguei isso código :

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Dim NewForm As System.Windows.Forms.Form
            NewForm = New System.Windows.Forms.Form
            'USE THE NEXT LINE - to add an existing CUSTOM form you already have
            'NewForm = Form7                         
            NewForm.Width = 400
            NewForm.Height = 250
            NewForm.MdiParent = Me
            NewForm.Text = "CAPTION"
            NewForm.Show()
            'DockChildForm(NewForm, "left")          'dock left
            'DockChildForm(NewForm, "right")         'dock right
            'DockChildForm(NewForm, "top")           'dock top
            'DockChildForm(NewForm, "bottom")        'doc bottom
            'DockChildForm(NewForm, "full")          'fill the client area (maximise the child INSIDE the parent)
            'DockChild

    Quero saber também  como que eu faco para quando eu coloco o form meio que sando do form principal ele não ativa o barra de rolagem.

     

    Olá, amigo!
    Testastes a dica que te dei acima?

    Estou com um outro HD em meu note, ainda vou instalar o VS. Mas, adiantando dá uma pesquisadinha nas Propriedades do teu Form, que mais tarde eu retorno por aqui para te dar mais uma forcinha!
    Abraço!


    MS INFORMATICA

    quarta-feira, 18 de março de 2015 19:02