Динамические контролы

@P@Ssword · Регистрация: 05.04.2008

Студворк — интернет-сервис помощи студентам

В ActiveX DLL кладу Юзер контрол, в него набиваю:

Code
1
2
3
Sub foo()
    MsgBox 'Yoy!'
End Sub

В основном проекте пишу:

Code
1
2
3
4
...
    Form1.Controls.Add 'Имя_DLL.Контрол', Control
    Control.foo
...

На последней строке пишет, что метод не поддерживается. Почему?

@WestAdmin · 12.02.2009, 10:03

Привет.

Все потому, что ДЛЛ не может содержать Юзер контролы являющиеся Public.

Для этого существуют проекты типа ActiveX Control.

@P@Ssword · 14.02.2009, 09:49 **[ТС]**

Но ведь контрол создается, только моих методов у него нет!

16.02.2009, 16:41

Code
1
2
3
  Dim x As Object
  Set x = Form1.Controls.Add('Имя_DLL.Контрол', 'как-то')
  x.foo

@WestAdmin · 16.02.2009, 19:00

Доброго времени суток.

Я конечно дико извеняюсь, но по моему, это невозможно. Может пришлете мне примерчик такой реализации?

17.02.2009, 10:09

Code
1
2
3
4
5
6
7
8
9
Private Sub Form_Load()
  Dim x As Variant
'  Dim x As Object
'  Dim x As Control
'  Dim x As CommandButton
  Set x = Controls.Add('VB.CommandButton', 'xxx')
  x.Visible = True
  x.Move 100, 100
End Sub

Появится кнопка.

@WestAdmin · 17.02.2009, 11:19

Доброго времени суток.

Это конечно очень интересно, но это использование стандартного контрола.
А попробуй сделать так со своим контролом, самописным, лежащим во внешней ДЛЛ.

?

17.02.2009, 13:45

WestAdmin:
Ну право недоверчивый ты!

Code
1
2
3
4
5
Private Sub Form_Load()
  Dim x As Object
  Set x = Controls.Add('ViControl.UserControl1', 'xxx')
  x.Visible = True
End Sub

ViControl - это обычный UserControl контрол, без наворотов и одной Label на нем. Никаких ссылок на ViControl в проекте с Form_Load нет, используется только лишь имя 'ViControl.UserControl1'.

@WestAdmin · 17.02.2009, 14:20

Доброго времени суток.

Зри в корень!
т.е. прочитай первое сообшение!

Речь идет о DLL а не про OCX!
С ocx все понятно. Я ж тоже не полный профан!

17.02.2009, 14:45

Я ориентировался на ответ P@Ssword
'Но ведь контрол создается, только моих методов у него нет!'
Т.е. контрол создается. Тогда доступ к нему должен идти через Late Binding, через Object.

@P@Ssword · 21.02.2009, 08:26 **[ТС]**

2 Vita

Я в постах не видел вызова процедур. Они точно работают?

Новые блоги и статьи Все статьи Все блоги /
Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это дополнительная запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .

@WestAdmin 0 / 0 / 0 Регистрация: 19.02.2008 Сообщений: 25
	12.02.2009, 10:03
	Привет. Все потому, что ДЛЛ не может содержать Юзер контролы являющиеся Public. Для этого существуют проекты типа ActiveX Control. 0

@P@Ssword 0 / 0 / 0 Регистрация: 05.04.2008 Сообщений: 73
	14.02.2009, 09:49 [ТС]
	Но ведь контрол создается, только моих методов у него нет! 0

@WestAdmin 0 / 0 / 0 Регистрация: 19.02.2008 Сообщений: 25
	16.02.2009, 19:00
	Доброго времени суток. Я конечно дико извеняюсь, но по моему, это невозможно. Может пришлете мне примерчик такой реализации? 0

@WestAdmin 0 / 0 / 0 Регистрация: 19.02.2008 Сообщений: 25
	17.02.2009, 11:19
	Доброго времени суток. Это конечно очень интересно, но это использование стандартного контрола. А попробуй сделать так со своим контролом, самописным, лежащим во внешней ДЛЛ. ? 0

@WestAdmin 0 / 0 / 0 Регистрация: 19.02.2008 Сообщений: 25
	17.02.2009, 14:20
	Доброго времени суток. Зри в корень! т.е. прочитай первое сообшение! Речь идет о DLL а не про OCX! С ocx все понятно. Я ж тоже не полный профан! 0

Vita
	17.02.2009, 14:45
	Я ориентировался на ответ P@Ssword 'Но ведь контрол создается, только моих методов у него нет!' Т.е. контрол создается. Тогда доступ к нему должен идти через Late Binding, через Object.

@P@Ssword 0 / 0 / 0 Регистрация: 05.04.2008 Сообщений: 73
	21.02.2009, 08:26 [ТС]
	2 Vita Я в постах не видел вызова процедур. Они точно работают? 0