ADICIONAR DOIS CONTROLES EM UM CONTAINER
Segue o código que utilizo para adicionar uma picturebox em uma label
e os eventos:
Logo em baixo do
Eu tentei colocar para adicionar o mesmo objeto em outra label assim
NR_PRODUTO.Controls.Add(NR_001)
Porém não funcionou
Private WithEvents NR_001 As PictureBox
Private Sub NR_ENTER_LEAVE()
[ô]
[ô]
[ô]FOTO1
[ô]
[ô]
NR_001 = New PictureBox
NR_001.Dock = DockStyle.Fill
NR_001.SizeMode = PictureBoxSizeMode.StretchImage
NR_001.BackColor = Color.Transparent
AddHandler NR_001.MouseEnter, AddressOf NR_ENTER_EVENTS
AddHandler NR_001.MouseLeave, AddressOf NR_LEAVE_EVENTS
NR_NOME_FOTO.Controls.Add(NR_001)
e os eventos:
Private Sub NR_ENTER_EVENTS(sender As Object, e As EventArgs)
Dim c As PictureBox = CType(sender, PictureBox)
c.Image = My.Resources.TransparentDown
End Sub
Private Sub NR_LEAVE_EVENTS(sender As Object, e As EventArgs)
Dim c As PictureBox = CType(sender, PictureBox)
c.Image = Nothing
End Sub
Logo em baixo do
NR_NOME_FOTO.Controls.Add(NR_001)
Eu tentei colocar para adicionar o mesmo objeto em outra label assim
NR_PRODUTO.Controls.Add(NR_001)
Porém não funcionou
A instância de NR_001 tem que estar visÃvel fora do NR_ENTER_LEAVE().
Como assim?
Me equivoquei. Qual erro acontece? Experimenta colocar um NR_001.Visible = true
não funcionou
Fica aparecendo so no PRODUTO, e na FOTO não
Fica aparecendo so no PRODUTO, e na FOTO não
é claro que não vai aparecer nada, você não está carregando nenhuma foto nela. Falta algo como:
NR_001 .Image = Bitmap.FromFile(caminho)
mas a imagem é setada nos eventos Enter e Leave
Por que não cria um usercontrol? com um picturebox e 1 label?
O problema é que você está usando a mesma instância da picturebox para dois containers, aà quando perde-se o foco, essa mesma picturebox é limpa no evento leave. Fiz um exemplo aqui. Quando aparecer o form, clica no botão e depois passe o mouse em cima dos containers. Me diga se é isso o que precisa.
Era exatamente isso, obrigado
Tópico encerrado , respostas não são mais permitidas