Differenze tra le versioni di "Mostrare un Balloon in corrispondenza della cella nella quale si è cliccato"

Versione delle 11:37, 3 gen 2015

Per far apparire un Balloon in un punto stabile, ad esempio al centro della cella nella quale si è cliccato, è possibile utilizzare il seguente codice:

Public Sub Form_Open()

 GridView1.Columns.Count = 3
 GridView1.Rows.Count = 3

End


Public Sub GridView1_Menu()   ' Cliccando con il tasto destro del mnouse...

 Balloon.Info("Cella: " & GridView1.Row & "," & GridView1.Column, GridView1, (GridView1.Columns[GridView1.Column].X + GridView1.Columns[GridView1.Column].W) / 2, GridView1.Rows[GridView1.Row].Y + GridView1.Rows[GridView1.Row].H)

End

In quest'altro caso, più semplice, il Balloon apparirà nel punto ove si è cliccato con il mouse all'interno di una cella della GridView:

Public Sub Form_Open()

 GridView1.Columns.Count = 3
 GridView1.Rows.Count = 3

End


Public Sub GridView1_MouseDown()

 Balloon.Info("Cella: " & GridView1.Row & "," & GridView1.Column, GridView1, Mouse.X, Mouse.Y)

End