Страница: 1 |
Страница: 1 |
Вопрос: Как предотвратить создание одинаковых классов?
Добавлено: 23.06.09 10:34
Автор вопроса: Jak | Web-сайт:
Есть класс документ (наследник формы). Когда на форме списка документов нажимают Открыть, то я перебираю все формы приложения, ищу форму с нужным ID. Если нахожу, то просто показываю форму этого документа, если нет, то создаю нов экземпляр класса
Как сделать этот перебор в конструкторе класса и предотвратить повторное создание экз. класса. Если найдем нашли экземпляр класса с таким же ID, то вернуть ссылку на него. Если не нашли, то создаем нов экземпляр.
Создание экз. класса документа происходит из многих мест программы. Не хочется в каждом из них писать перебор уже созданных.
Сейчас в каждом месте открытия документа приходится писать:
Dim f As Form
Dim OpenedForm As TRSpec_crd_Form = Nothing
Dim s As String = ""
' Ищем уже открытую форму этой спец-ии
For Each f In Application.OpenForms
If (f.Text.ToUpper.Substring(0, Math.Min(f.Text.Length, 12)) = "ДОКУМЕНТ") And (f.Tag = ID) Then
OpenedForm = f
End If
Next
' Если не нашли
If OpenedForm Is Nothing Then
' создаем нов класс
Try
Dim tmpTRSpec As New TRSpec_crd_Form(ID)
tmpTRSpec.Show()
Catch ex As System.Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
Else
' если нашли, то активируем или открываем старый
OpenedForm.Activate()
End If
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
Artyom
Разработчик
Вопросов: 130
Ответов: 6602
Профиль | | #1
Добавлено: 23.06.09 10:46
Через конструктор это не удастся реализовать.
Как правило это делается с помощью фабрики.
Конструктор класса делаешь приватным, также делаешь публичный общий метод, который будет создавать новую форму, или возвращать уже созданную.
http://ru.wikipedia.org/wiki/%D0%A4%D0%B0%D0%B1%D1%80%D0%B8%D1%87%D0%BD%D1%8B%D0%B9_%D0%BC%D0%B5%D1%82%D0%BE%D0%B4_(%D1%88%D0%B0%D0%B1%D0%BB%D0%BE%D0%BD_%D0%BF%D1%80%D0%BE%D0%B5%D0%BA%D1%82%D0%B8%D1%80%D0%BE%D0%B2%D0%B0%D0%BD%D0%B8%D1%8F)