Počet viditelných položek v ListView
Postup:
Založte nový projekt. V
deklarační části formuláře zapište:
Private
Const LVM_FIRST = &H1000
Private Const LVM_GETCOUNTPERPAGE = (LVM_FIRST + 40)
Private Function GetListviewVisibleCount() As Long
GetListviewVisibleCount = SendMessageLong(ListView1.hwnd,
LVM_GETCOUNTPERPAGE, 0&, ByVal 0&)
End Sub
Volat tuto funkci můžete například pomocí funkce MsgBox.