Inquiridor
Exibir balão com informação

Pergunta
-
Fiz um thread que verifica a conexão com o banco de dados a cada 5 segundos, eu queria que para quando a conexão falhasse aparecesse um balão escrito "Falha na conexão com a base de dados" ou "A base de dados caiu". Só preciso saber como inserir esse "balão" ou "mensagem" bem similar ao ToolTip só que sem a necessidade de estar com o mouse em cima.
Todas as Respostas
-
Fiz um thread que verifica a conexão com o banco de dados a cada 5 segundos, eu queria que para quando a conexão falhasse aparecesse um balão escrito "Falha na conexão com a base de dados" ou "A base de dados caiu". Só preciso saber como inserir esse "balão" ou "mensagem" bem similar ao ToolTip só que sem a necessidade de estar com o mouse em cima.
Com botões já consegui, o problema é que com a label da um erro
-
Se você usa um NotifyIcon tente isto.
NotifyIcon1.ShowBalloonTip(5000, "Titulo", "Mensagem", ToolTipIcon.Error)
Para uma label.
ToolTip1.Show("texto", Label1)
Se possivel poste o erro que recebe.- Editado Eduardo Henrique Antunes quinta-feira, 6 de junho de 2013 12:13
-
Se você usa um NotifyIcon tente isto.
NotifyIcon1.ShowBalloonTip(5000, "Titulo", "Mensagem", ToolTipIcon.Error)
Para uma label.
ToolTip1.Show("texto", Label1)
Se possivel poste o erro que recebe.
No Segundo : Unable to cast object of type 'System.Windows.Forms.ToolStripStatusLabel' to type 'System.Windows.Forms.IWin32Window'. -
-
-
-
-
Olá!
Eu consegui fazer o que vc queria. Vc precisa criar um objeto tooltip em runtime e passar a posição do label para que ele apareça em cima do label. Vou colocar o código todo aqui, para que vc possa estudar e ver qual o melhor jeito de vc configurar a sua mensagem. Eu usei um label e um timer.
Public Class Form1 Dim iSegundo As Integer Dim iIntervalo As Integer Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Label1.Text = Now iSegundo = 0 iIntervalo = 15 Timer1.Start() End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Label1.Text = Now iSegundo = iSegundo + 1 If iSegundo = iIntervalo Then iSegundo = 0 Dim oToolTip As New ToolTip oToolTip.ToolTipTitle = "Título do Balão" oToolTip.ToolTipIcon = ToolTipIcon.Info oToolTip.UseAnimation = True oToolTip.Show("Oi Mundo!!!", Me, Label1.Top, Label1.Left, 5000) End If End Sub End Class
Desse jeito que postei, o balão do tooltip vai aparecer em cima do label, ok? Depois vc calcula exatamente onde vc quer que ele apareça em relação ao label em questão.
Att.
Giovani