TOOLTIPTEX

USUARIO.EXCLUIDOS 26/04/2004 02:05:40
#22641
Ola
Gostaria de saber c tem como fazer o seguinte: Quando o usuário clicar em um textbox , fazer com que apareca aquele ToolTipTex que é exibido quando o mouse fica parado por alguns segundos sobre o campo.
Mas eu quero que o ToolTipTex fique sendo exibido o tempo todo que o texbox estiver em foco ... Como faço isso?
CAJU 26/04/2004 11:06:47
#22683
Resposta escolhida
Dim CtlName As String

Private Sub Timer1_Timer()
If TypeOf ActiveControl Is TextBox Then
If CtlName = ActiveControl.Name Then Exit Sub
lblToolTip.Visible = True
lblToolTip.Top = ActiveControl.Top - lblToolTip.Height
lblToolTip.Left = ActiveControl.Left
lblToolTip.Width = ActiveControl.Width
lblToolTip.Caption = "Digite o nome"
lblToolTip.Refresh
Let CtlName = ActiveControl.Name
End If
End Sub

'timer1.intreval =500

é isso????
Tópico encerrado , respostas não são mais permitidas