1 pièce(s) jointe(s)
probleme avec button dans listview
Bonjour,
j'ai un petit souci quand le clique scollbars pour descendre les buttons reste fixe.
voici en image :
Pièce jointe 621497
le code :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
| Dim Itcontrol As New List(Of Control)
Private Function ListView_Buttons(lvl As ListView, count As Integer, index As Integer) As Button
Dim btn As New Button
btn.Text = "Telecharger " & count
btn.Tag = count
btn.FlatStyle = FlatStyle.Flat
btn.ForeColor = Color.Blue
AddHandler btn.Click, AddressOf Downloader
btn.Parent = lvl
Dim ps2 As ListViewItem.ListViewSubItem
ps2 = lvl.Items(count).SubItems(index)
Dim rt2 As New Rectangle
rt2 = ps2.Bounds
btn.SetBounds(rt2.X, rt2.Y + 32, rt2.Width, rt2.Height - 65)
Return btn
End Function
Itcontrol.Add(ListView_Buttons(ListView1, i, 3)) |
je voudrais savoir si c'est possible avec scollbars en descendant on voir le numéro du bouton 0 à 19? merci d'avance