LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Parent...
 Тема: Parent
 
 15.06.2007 21:08:15
Alex2
25 сообщения


Тема: Parent
Есть Форма1, на ней Контрол1.

Есть Форма2, на ней есть Tab control, на закладке Tab control - соответственно, Контрол2

Есть функция, которая в ходе выполнения определяет родительскую форму контрола.

Контрол1.Parent = Форма1, ура.
Контрол2.Parent = Tab Control

Не секрет, что
Контрол2.Parent.Parent = Форма2,
но в функции как это все обставить?
Короче, как определить, Контрол2.Parent это контрол или форма?

Заранее спасибо.



P.S. Общий раздел по формам
Автор: Alex от 28.03.2004 19:59:06 Источник ...
 15.06.2007 21:08:15
All
4316 сообщения
1-ый


RE: Parent
1. Проверьте объект, который может существовать только у формы, например, form, filter. Можно использовать TypeName или выход по ошибке для контроля.

2. В теге объекта (tag) при загрузке формы можно сохранить ключевую иформацию и ее проверять.


P.S. Общий раздел по формам
Автор: Admin от 0:00:00 Источник ...
 15.06.2007 21:08:15
Alex2
25 сообщения


Решение
Спасибо!

Dim obj as Object, frm as Form
Set obj = Контрол1

Do
Set obj = obj.Parent
Debug.Print obj.Name
Loop Until InStr(TypeName(obj), "Form_") > 0

Set frm = obj
Set obj = Nothing



P.S. Общий раздел по формам
Автор: Alex от 29.03.2004 12:57:50 Источник ...
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Parent...
ПоискПоиск  Список форумовСписок форумов  
right