Вопрос по динамическим контролам

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
kibernetics
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 945
Зарегистрирован: 03.05.2006 (Ср) 13:31
Откуда: Minsk

Вопрос по динамическим контролам

Сообщение kibernetics » 22.03.2019 (Пт) 12:41

Приветствую!
Сейчас в проекте есть пару классов, которые хранят собственные конструкторы для динамических контролов.
Когда это было пару классов, то это ещё куда ни шло. А теперь, на разных формах нужно накидать свои наборы контролов.
Так, к примеру, на одной форме используются динамическая пара контролов, состоящая из 2 текстбоксов. Для этого есть класс, примерно такого содержания:
Код: Выделить всё
Option Explicit
Private WithEvents ctlTextbox2   As VB.TextBox
Private WithEvents ctlTextbox    As VB.TextBox
Public Event OnChange(ByVal Text As String)

Private Sub Change(ByVal Text As String)
    RaiseEvent OnChange(Text)
End Sub

Public Property Set TextBox2(rhs As TextBox)
    Set ctlTextbox2 = rhs
End Property

Public Property Get TextBox2() As TextBox
...

На другой форме нужны контролы, состоящие из 5-ти текстобоксов, потом, к примеру, понадобиться на форме комплект из 7-ми и т.д.

Так что же выходит, что нужно под каждый набор из нужного количества создавать отдельный класс?
Как можно всё организовать динамически в одном классе? Или так не получится?

The trick
Постоялец
Постоялец
 
Сообщения: 781
Зарегистрирован: 26.06.2010 (Сб) 23:08

Re: Вопрос по динамическим контролам

Сообщение The trick » 22.03.2019 (Пт) 12:47

Это для того чтобы обработать события от массива контролов?
UA6527P

kibernetics
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 945
Зарегистрирован: 03.05.2006 (Ср) 13:31
Откуда: Minsk

Re: Вопрос по динамическим контролам

Сообщение kibernetics » 22.03.2019 (Пт) 15:14

The trick писал(а):Это для того чтобы обработать события от массива контролов?

да, в том числе.
Например, на одной форме грузится массив контролов:
Код: Выделить всё
Имя: [textbox]
Имя: [textbox]
...

на другой форме уже нужно 2 текстобокса в группе
Код: Выделить всё
Имя: [textbox] Фамилия: [textbox2]
Имя: [textbox] Фамилия: [textbox2]
...

на третьей форме:
Код: Выделить всё
Имя: [textbox] Фамилия: [textbox2] Отчество: [textbox3] Год рождения: [textbox4]
Имя: [textbox] Фамилия: [textbox2] Отчество: [textbox3] Год рождения: [textbox4]
...

Скажу что я хочу сделать, так это регулируемое количество текстбоксов, в зависимости от запроса.
Т.е. если я сделал запрос вида:
select name from table, то здесь мне понадобиться один текстбокс.
Ну, а для запроса вида
select name, surname, birth from table, то здесь очевидно, что мне понадобиться их уже три.

The trick
Постоялец
Постоялец
 
Сообщения: 781
Зарегистрирован: 26.06.2010 (Сб) 23:08

Re: Вопрос по динамическим контролам

Сообщение The trick » 22.03.2019 (Пт) 19:20

UA6527P


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 59

    TopList