Jump to content
Fórum Script Brasil
  • 0

Mdi Form


Tavinho

Question

biggrin.gif Fala Galerinha...

To com umas duvidazinhas básicas....

Primeiro to usando o MDIform e nele tenho menu que irão abrir os formulários da minha aplicação, mas quando executo e clico nos botões, os formulários abrem, fora do MDI.

Pergunta: Como fazer pra que eles abram dentro do MDI e de preferencia ocupando todo o espaço dele...

Segundo, tenho um campo de consulta em um dos forms, e gostaria de saber como fazer para que quando o usuario digitasse um nome a ser buscado com letras maiusculas por exemplo, o vb fizesse essa conversão e entendesse o que foi digitado...

Ex: Ze ser o mesmo que ze

Maria ser o mesmo que maria e assim por diante, ou vice-versa..

Terceiro, como os caras fazem para que os programas, sejam adaptaveis a diversas resoluções de tal ?

Obrigado pela ajuda ...

abraços

Link to comment
Share on other sites

8 answers to this question

Recommended Posts

  • 0

cara...posso te responder duas das três dúvidas suas...a terceira você de uma olhada se te serve

Primeira: acerte a propriedade "MDIChild" dos seus formulários para True e a "Window State" para 2-Maximized...isso fará com que os forms apareçam ocupando td o MDI

Segunda: existe uma função no vb chamada Lcase() que transforma toda a string que tiver dentro dos parenteses em letras minúsculas...e a função UCase() transforma td em letras maiúsculas

Quanto à terceira eu já tinha visto um tpc parecido no fórum

http://scriptbrasil.com.br/forum/index.php...24&hl=resolução

Abraços!

Link to comment
Share on other sites

  • 0

Terceiro, como os caras fazem para que os programas, sejam adaptaveis a diversas resoluções de tal ?

Obrigado pela ajuda ...

Veja este código:

'Redimensionar Controles do Formulário
Private WidDiff As Single
Private HeiDiff As Single
Private OldFrmWid As Integer
Private OldFrmHei As Integer

Private Sub Form_Resize()
    Dim CTL As Control
    On Error Resume Next

    If (WidDiff <> 1) Or (HeiDiff <> 1) Then

        WidDiff = (Form1.Width / OldFrmWid)
        HeiDiff = (Form1.Height / OldFrmHei)

        For Each CTL In Controls
            With CTL
                .Left = (CTL.Left * WidDiff)
                .Top = (CTL.Top * HeiDiff)
                .Width = (CTL.Width * WidDiff)
                .Height = (CTL.Height * HeiDiff)
            End With
        Next CTL

        OldFrmWid = Form1.Width
        OldFrmHei = Form1.Height

    End If

    OldFrmWid = Form1.Width
    OldFrmHei = Form1.Height

End Sub

Este código vai redimensionar todos os controles de seu formulário,

Falow... T+

Link to comment
Share on other sites

  • 0

ow mariozneto...aproveitando o código que você postou...só pra tirar uma dúvida....

tp...e se o usuário tentar dimensionar o formulário? tp...indu com a setinha no canto...ou então se eu tiver alguma funçao que mexa com o redimencionamento do form....não vai entrar em conflito?

falou

Link to comment
Share on other sites

  • 0
ow mariozneto...aproveitando o código que você postou...só pra tirar uma dúvida....

tp...e se o usuário tentar dimensionar o formulário? tp...indu com a setinha no canto...ou então se eu tiver alguma funçao que mexa com o redimencionamento do form....não vai entrar em conflito?

falou

Não!!! biggrin.gif

Falow... T+

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      152k
    • Total Posts
      651.5k
×
×
  • Create New...