| Вопрос: Коллекция Forms | Добавлено: 07.06.05 17:06 |
Автор вопроса:  iLLyuzor | ICQ: 223685087 |
|
Предисловие: Есть класс (CollectionForms), который хранит формы, так как коллекции Forms в VB.NET не существует. В каждой форме есть процедура с одинаковым именем, скажем SetVisualStyle().
Собственно вопрос: как в перечислимом цикле вызвать эту процедуру. То есть: Dim CurrentForm as Form For Each CurrentForm in CollectionForms 'вот здесь как её вызвать? Next |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа: Павел Администратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #1 | Добавлено: 07.06.05 17:27 |
|
Лучший вариант - через интерфейсы. Сделать интерфейс:
Friend Interface IMyVisualStyles
Sub SetVisualStyle () End Interface В каждой форме добавить декларацию реализации интерфейса: Public Class frmChart
Inherits System.Windows.Forms.Form Implements IMyVisualStyles '... Указать (в каждой форме), что метод SetVisualStyle реализует метод интерфейса: Friend Sub SetVisualStyle () Implements IMyVisualStyles.SetVisualStyle
Далее в коде перебора форм обращаемся к методу интерфейса: For Each CurrentForm As Form in CollectionForms
CType(CurrentForm, IMyVisualStyles).SetVisualStyle () Next |
||
|
Номер ответа: 2 Автор ответа:  iLLyuzor ICQ: 223685087 Вопросов: 9 Ответов: 77 |
Профиль | | #2 | Добавлено: 08.06.05 10:52 |
| Спасибо. | ||
Страница: 1 |