Не вызывается метод другой формы

LOR
Дата: 11.05.2006 21:21:39
Прошу извинить за беспокойство.

Ситуация.

Есть первая форма Form1.
Есть вторая форма Form2.
Есть класс для работы с ListView ClassListView.

В классе ClassListView есть метод

Public Sub SelectListItem(ByRef lswListView As ListView, ByVal iValueColumn As Integer, ByVal iValueSelect As Integer),

который предназначен для выделения одной из строк в элементе управления ListView, в том, который передается в метод, как один из параметров.

На форме Form1 имеется элемент управления ListView - ListView1

Этому ListView1 соответствуют глобальная переменная GlobalListView1.

Одна из процедур Form2 вызывает метод SelectListItem, передавая ему как параметр глобальную переменную GlobalListView1 (то есть - ListView1 на Form1).


Вопрос.

Почему, благодаря вызываемому методу выделение нужной строки в ListView1 происходит, однако событие ListView1_SelectedIndexChanged нри этом не генерируется?

Спасибо.
Vw
Дата: 12.05.2006 11:34:50
без кода слабо что понял, но по-моему что то надо описывать
 Dim WithEvents ...
Deft
Дата: 12.05.2006 11:35:06
Кидай пример!

_____________________________________________
Правды как минимум две...
Vw
Дата: 12.05.2006 15:29:05
Deft
Кидай пример!

_____________________________________________
Правды как минимум две...

да ты код покажи!
NEKRASSOV
Дата: 13.05.2006 20:09:55
Потому что происходит событие SelectedItemChenged
LOR
Дата: 14.05.2006 11:34:35
Спасибо всем огромное!
Это отрывки кода.
Если этого недостаточно, готов привести весь код.


Module Global

..........
Public lswContactListView As ListView ' Объявление глобальной переменной
..........

End Module




Public Class ListViewWork 'Класс для работы с элементами ListView

......................................

Public Sub SelectListItem(ByRef lswListView As ListView, ByVal iValueColumn As Integer, ByVal iValueSelect As Integer) ' Процедура по выделению записи в ListView

Dim i As Integer

For i = 0 To lswListView.Items.Count - 1

If lswListView.Items(i).SubItems(iValueColumn).Text = iValueSelect Then

lswListView.Focus()
lswListView.Items(i).EnsureVisible()
lswListView.Items(i).Selected = True

End If

Next

End Sub

...........................

End class


' Вызов из Form2 (надо сказать, что само выделение записи происходит без проблем, просто событие SelectedIndexChanged для этого ListView на Form1 не генерируется.)

Private Sub btnCommCommit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCommCommit.Click

......................................

Me.Close() ' закрывается Form2

Dim lswListCP As New LVListView.ListViewWork()
lswListCP.SelectListItem(lswContactListView, 0, iCPID)

...............................

End sub
Deft
Дата: 17.05.2006 12:33:44
Ну если не напрягаться и не думать можно попробовать
RaiseEvent lswListView.SelectedIndexChanged 

_____________________________________________
Правды как минимум две...