Формирование формы на лету.

[schalexey]

Ктонить пытался реализовать формирование содержания формы на лету, те. при чтении данных из файла формируется форма (элементы на ней).... Причем файл может меняться (само собой) и могут добавляться новые элементы, приэтом форма должна грузиться с отображением этих элементов (пускай символическое: поле текстовое напр.) , без изменения кода.

[Eduard]

API друг мой дорогой API - да помогут тебе!!

[GSerg]

Нет, ну зачем же...
Пишем в текстовик полные ID контролов...
Читаем построчно...
Делаем controls.add...

[Ship]

Private WithEvents Text1 As TextBox

Private Sub Form_Load()

Set Text1 = Controls.Add("VB.TextBox", "Text1")
Text1.Visible = True
Text1.Left = 100
Text1.Text = "TextBox"


End Sub

[schalexey]

Нет, ну зачем же...
Пишем в текстовик полные ID контролов...
Читаем построчно...
Делаем controls.add...

если б ткстовик, все гораздо извращенней... xml с структурой в несколько уровней с различными пораметрами...

[GSerg]

Так это ж ещё лучше...
Подключаем XML парсер и делаем controls.add с последующей установкой параметров.

[schalexey]

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

<entry name = "type" type = "list">           
         <title lang = "ru">                Тип интерактивности
           
         </title>           
         <description lang = "ru">тип
           
         </description>           
         <list>             
            <item value = "Active" lang = "ru">Активный</item>                         
            <item value = "Expositive" lang = "ru">Описательный</item>                         
            <item value = "Mixed" lang = "ru">Смешанный</item>                         
            <item value = "Undefined" lang = "ru">Неопределенный</item>           
         </list>       
      </entry>       
      <entry name = "level" type = "list">           
         <title lang = "ru">    уровень
         </title>           
         <list>               
            <item value = "very low" lang = "ru">Очень низкий</item>               
            <item value = "low" lang = "ru">Низкий</item>               
            <item value = "medium" lang = "ru">Средний</item>               
            <item value = "high" lang = "ru">Высокий</item>               
            <item value = "very high" lang = "ru">Очень высокий</item>           
         </list>       
      </entry>       


что то типо этого... и нужно построить формы...

[VERITAS]

Решил поднять вопрос, так как сам столкнулся с этой проблемой.

Мне нужно добавить свой Контрол на форму в реал-time, однако я не знаю его ID, вызывается ошибка 711 (Invalid class string). Пользовался я кодом см. выше, только со своим контролом.

Как это ?