Вызов формы из dll

[ale_x]

Как вызвать и управлять контролами формы из dll

[ale_x]

У меня взникла проблема с управленией формой из dll.
В dll были форма и модуль классов. форма Form1. на ней расположены textbox и кнопки.
Как вызвать форму из dll и изменять контролы.
то есть нужно постоянно, передавать в textbox новые значения и изменять активность и название кнопок.

Раньше я просто вызывал форму в модуле класса
Pubcli Function X()
set x =New Form1
x.show
End Function

[Viper]

ale_x, сделай третью попытку. Желательно четко и ясно изложи, что и где у тебя есть и откуда до этого тебе надо добраться.
А то непонятно, то ли у тебя есть форма в глубинах dll и до нее надо достучаться из другого проекта, то ли одно из двух.

[ale_x]

Вообщем, я делаю чат на VB, и форма чата должна находиться в dll. Так вот как её вызвать и передавать в textbox, расположенный на этой форме, текс с проекта к которому подключена dll.

т.е. как вызвать форму из dll, который я сам создам, и сней работать: управлять контролами и т.д.

А то у меня получается только вызвать форму, а как её управлять ума ни как не могу дать.
Какой код писать в модули класса dll ? и как вызывать и управлять формой dll из проекта? Если несложно, пожалуйста, покажите мне балбесу нагдяный пример.

[Viper]

Общение с формой, находящейся в DLL производится ровно также, как и с формой,находящейся в "родном" проекте, т.е. объявлешь переменную с необходимым уровнем видимости, создаешь экземпляр формы при помощи New и общаешься с ней так как тебе нужно.

[Денис]

Viper
то есть как это "объявить новый экземпляр формы", если в DLL она компилится как приватная?? Или тогда подскажите, как сделать чтоб она стала MultiUse

[ale_x]

Че так я не понял, а как вызывать её в проекте. Можно небоьшой примерчик проекта и dll, плиз

[Viper]

Упс... Эт я погорячился конечно. Напрямую никак, однако реализовать общение с формой находящейся в DLL возможно. Вариантов 2:
1. Через позднее связывание. В этом случае в DLL должен быть класс с параметром Instancing равным GlobalMultiuse, который имеет Public свойство (или функцию) возвращающее ссылку на экземпляр формы, например так:

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

Public Property Get GetForm() As Object
Set GetForm = New MyMain
End Property

В exe соответственно общаемся с полученным объектом так как нам нужно.
2. При помощи того же механизма возвращаем ссылки на нужные нам свойства. Т.е. например созадаем свойство для доступа к текстовому полю

З.Ы. А вообще такой ситуации быть по идее не должно, что-то неправильно спроектировано в программе

[Денис]

Viper
A есть ли возможность подгружать формы из dll в родительское MDI-окно в программе? Делал так:

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

Private frmNew As Form
...

Private Sub MDIForm_Load()

Dim A1 As New clsTools

Set frmNew = A1.GetForm

frmNew.Show

End Sub

но вылетает ошибка, что форма не может найти MDI-форм в проекте (в библиотеке само собой форму предварительно делаю MDIChild=True)
Получается, что MDIChild-форма в библе ищет MDIClient-форму в ней же, в библе, а форма то - в программе.

[Viper]

Денис, можно! У меня такой методой реализован весьма немаленький проект. Щаз код не приведу, но в двух словах из exe вызывется метод, параметром которого является MDIForm, а в DLL соответственно открывается дочерняя форма.
З.Ы. Код поищу.

[Viper]

А задачка то с отображением дочерней формы из DLL внутри MDI-формы не так уж и проста оказывается... %) Но ведь решается же... %)
З.Ы. И кстати было что-то такое на форуме...

[Matew]

Денис, а просто SetParent не подойдет?

[Viper]

Matew, просто SetParent тут не пройдет, однако SetParent позволяет сию проблему таки решить. Метода такая:
1. В DLL создается форма со всеми нужными контролами, но без заголовка, и со свойством MDIChild = False.
2. В EXE (точнее в приложении, использующем DLL) создаем пустую форму с MDIChild = True.
3. Получаем ссылку на экземпляр формы из DLL, а далее при помощи SetParent делаем местную форму родителем для беззаголовочной формы из DLL.

Вот и все дела.

[Денис]

Viper
Это по описанию получается, как фрейм... А как ты решил вопрос с изменением размера родительской формы (_Resize)?

[Viper]

как ты решил вопрос с изменением размера родительской формы (_Resize)?

Никак не решал, мне сие не нужно было. Думаю решить можно. Навскидку - при ресайзе родителя вызывать Public метод DLL, который сделает все что нужно, т.е. передаст сообщение форме из DLL.
З.Ы. Другой способ решения проблемы - вместо формы просто использовать свой контрол. ИМХО: более сложный все же способ.

[SystemError]

Я недавно делал точно такую шляпу!
Это делается довольно просто:
1. в длл-ке делается функция которая возвращает объек (в нашем случае этим объектом является форма)
2. подрубаем длл-ку (либо в рантайме либо через references)
3. вызываем нашу функцию и получам объект формы, с которым можно работать также как с самой формой

по поводу MDI:
я пишу на VB2005 и там это делается примерно так:

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

            PluginForm = objPlugin.RunPlugin()
            PluginForm.MdiParent = Me
            PluginForm.Show()


objPlugin - это класс самой длл-ки
RunPlugin - функция из длл-ки, которая возвращает объект(форму)

[Viper]

SystemError, VB.NET <> VB6, посему твой вариант с MDI-формами не пройдет. Ну а остальное умпешно ответили раньше.