Controls :)

[PUNK-GRUNGER]

Вобщем, контро у мя - туды динамические добавляется куча uscItem (это другой контрол - уже работящий). И вот у этого самого uscItem есть паблик функция ColorSelected()

Как к ней обратиться? В плане если у меня есть имя - я к ней напрямую обращаюсь, типа uscItem.ColorSelected(), но у мя же динамически... Нуно, как я понимаю, через Controls:

Код: Выделить всё


Dim i As Integer
        For i = 1 To picList.Controls.Count - 1
            If TypeOf picList.Controls(i) Is uscItem Then
' Вот здесь ошибка
                picList.Controls(i).ColorSelected()
' Вот здесь ошибка
            End If
        Next


Расскажите плиз, дорогие Гуру

[PUNK-GRUNGER]

Сори, в последний момент додумался CType(picList.Controls(i), uscItem).ColorSelected()