ListView и SendMessage

[visualman]

Требуется выделить конкретный номер записи по её индексу в ListView (в стиле отображения - репорт)

Например следующая процедура выбирает запись по её индексу в ComboBox или ListBox (декларации писать не буду):

Public Sub ListSelectItemIndex(ByVal hWnd As Long, ByVal Index As Long)
Dim RetVal As Long

RetVal = SendMessage(hWnd, CB_SETCURSEL, ByVal Index, 0)
End Sub


Вот мне бы такую функцию для ListView заиметь ))

Ещё бы было замечательно, если бы кто нибудь сказал, как получить колличество записей в ListView. Заранее огромное спасибо!

[tyomitch]

леньтяй!
LVM_SETSELECTIONMARK
LVM_GETITEMCOUNT