Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > VB6 > Динамический вызов формы

Автор: Bratsman 23.6.2004, 18:38

Вообщем-то так.
Есть несколько формочек в одной DLL. Имеют разное название. Можно ли написать такой суб, который получает в качестве параметра строку в которой записано название формы, и запускает искомую форму...

Автор: boevik 24.6.2004, 11:32

А не проще ли в DLL написать суб, который принимает имя формы и возвращает проге форму.
К примеру, суб в DLL

Код

public function LoadForm(FormName as String) as Form
Select Case FormName 
   Case "Form1":
       Set LoadForm = Form1
   Case "Form2":
       Set LoadForm = Form2
   Case "Form3":
       Set LoadForm = Form3
   Else
       Set LoadForm = Nothing
End Select
End function

А из проги уже можно делать с формой то что пожелаешь.

Код

Dim f as Form
Set f = myDLL.LoadForm("Form1")
f.Show