IMAGEM FULL SCREEN COM MDI CHILD
Boa tarde,
tudo bom?
Estou com uma dúvida
eu segui este fórum
www.vbmania.com.br/pages/index.php?varModulo=Forum&varMethod=abrir&varID=291958&varPagina=4
até aqui tudo normal,
só que em meu menu tem alguns formulário tem a propriedade Mdichild = true
então não aparece na tela pois certamente fica atrás da imagem de fundo
como eu devo fazer para resolver esse problema?
tudo bom?
Estou com uma dúvida
eu segui este fórum
www.vbmania.com.br/pages/index.php?varModulo=Forum&varMethod=abrir&varID=291958&varPagina=4
até aqui tudo normal,
só que em meu menu tem alguns formulário tem a propriedade Mdichild = true
então não aparece na tela pois certamente fica atrás da imagem de fundo
como eu devo fazer para resolver esse problema?
tambem tenho essa mesma duvida
Não consegui simular o problema, tenta colocar o zorder do form como 0 que é por cima tudo se não me engano.
ps: a propriedade zorder do form so pode ser alterada via código
ps: a propriedade zorder do form so pode ser alterada via código
Faz assim:
[ô]Limpa a PictureBox
Picture1.Cls
[ô]carrega a imagem no mdiForm
mdiPrincipal.Picture = LoadPicture([Ô]c:\JK1.bmp[Ô])
Picture1.AutoRedraw = True
Picture1.BackColor = &H8000000C [ô]Fundo Branco
Picture1.Height = Me.Height [ô]Lagura da PictureBox = mdiForm
[ô]Ajusta o Componente Image
Image1.Stretch = True [ô]Para ajustar a imagem dentro
Image1.Top = 0
Image1.Left = 0
Image1.Height = Picture1.Height
Image1.Width = Picture1.Width
[ô]Para carregar a imagem dentro da PictureBox
Picture1.PaintPicture Image1, Image1.Left, Image1.Top, Image1.Width, Image1.Height
[ô]Passa a imagem da PictureBox para o mdiForm.Picture (Propriedade que recebe imagem)
mdiPrincipal.Picture = Picture1.Image
[ô]Oculta a PictureBox, assim você pode visualizar os Form Child
Picture1.Visible = False
Boa Sorte.
[ô]Limpa a PictureBox
Picture1.Cls
[ô]carrega a imagem no mdiForm
mdiPrincipal.Picture = LoadPicture([Ô]c:\JK1.bmp[Ô])
Picture1.AutoRedraw = True
Picture1.BackColor = &H8000000C [ô]Fundo Branco
Picture1.Height = Me.Height [ô]Lagura da PictureBox = mdiForm
[ô]Ajusta o Componente Image
Image1.Stretch = True [ô]Para ajustar a imagem dentro
Image1.Top = 0
Image1.Left = 0
Image1.Height = Picture1.Height
Image1.Width = Picture1.Width
[ô]Para carregar a imagem dentro da PictureBox
Picture1.PaintPicture Image1, Image1.Left, Image1.Top, Image1.Width, Image1.Height
[ô]Passa a imagem da PictureBox para o mdiForm.Picture (Propriedade que recebe imagem)
mdiPrincipal.Picture = Picture1.Image
[ô]Oculta a PictureBox, assim você pode visualizar os Form Child
Picture1.Visible = False
Boa Sorte.
Segue código em anexo.
Não tem erro.
Para outros membros não ficarem preguiçosos (Marcelo que o diga, né? - Quase bateu em um esses dias - rsrsrs ---> Link do post do preguiçoso, para quem não viu: http://vbmania.com.br/pages/index.php?varModulo=Forum&varMethod=abrir&varID=416853&varWorld= )
Estou postando o código porque pelo menos ele tentou resolver sozinho.
Não tem erro.
Para outros membros não ficarem preguiçosos (Marcelo que o diga, né? - Quase bateu em um esses dias - rsrsrs ---> Link do post do preguiçoso, para quem não viu: http://vbmania.com.br/pages/index.php?varModulo=Forum&varMethod=abrir&varID=416853&varWorld= )
Estou postando o código porque pelo menos ele tentou resolver sozinho.
Tópico encerrado , respostas não são mais permitidas