Когда-то тоже озадачился subj.
1) в КАЖДОМ визуальном обьекте есть event - getname()
Можно просто не полениться и на всех своих uo проставить в этом обьекте
Это работает очень быстро и удобно для опознания конкретного uo-обьекта и не требует
специальных функций.
При желании и не ленивости - можно там же записать код
И тогда можно получить всю цепочку ancestor-ов. Только для получения текущего имени
придется пользоваться какой-нибудь token-функцией по разделителю [`]



2) ну и classdefinition конечно тоже работает. Но не в лоб. В массиве контролов
найти первый визуальный обьект (массив control[]) и в его определении будет
примерно такая ссылка
'uo_youwish`st_1'
- нужно взять token по тому же разделителю

3) во вложении - библиотека с nv-обьектом - там пара функций
( это zip - файл. Поскольку иногда корпоративные файрволлы рубят zip - изменено расширение )

У последней функции - только одно применение :
В root-меню определяется невидимый пункт с hot-вызовом , например Alt+Ctrl+O
По этой комбинации вызывается указанная функция
ls_ret = ????.of_collect_contols(<window_on_focus>)

И эту строку - либо в clipboard либо в специальное окно диагностики.
Выглядит примерно так

==== Список Controls на вызывающем окне ====
Window = W_DEMO_SHEET
1 w_demo_sheet window lvl=0 visible x=0 y=0 w=4667 h=2854 hnd=1424
2 tab_1 tab lvl=0 visible x=0 y=0 w=4630 h=2746 hnd=2456
3 cb_close commandbutton lvl=0 visible x=4341 y=13 w=289 h=80 hnd=2736
4 cbx_can_edit checkbox lvl=0 x=1510 y=19 w=1057 h=77 hnd=4076
5 tabpage_1 userobject lvl=1 tab_1 visible x=15 y=90 w=4601 h=2643 hnd=3064
6 tabpage_2 userobject lvl=1 tab_1 visible x=15 y=90 w=4601 h=2643 hnd=3416
7 dw_master1 datawindow lvl=2 tabpage_1 visible x=4 y=3 w=4590 h=2634 hnd=2732 uo_type=u_dwstandard_grid
8 st_ask_list statictext lvl=2 tabpage_2 visible x=172 y=1104 w=1009 h=64 hnd=676
....
16 cb_progress commandbutton lvl=2 tabpage_2 visible x=37 y=573 w=113 h=77 hnd=2472
17 uo_mspr userobject lvl=2 tabpage_2 visible x=179 y=573 w=1313 h=67 hnd=1664 uo_type=uo_message_progress

Кстати, нас вот этой функции :
Рекомендую

Есть и другие применения. Например собрать на This окне или userobject - в instance массив.
В составе структуры есть хранитель tag-ов для каждого -control-а.

А в этих тагах можно "прямым текстом" задать некие опции-условия - пройдясь по всем тагам определить по заданным соглашениям усовия видимости/доступности соответствующих control_ов - в зависимости от контекста. То есть не надо прыгать по именованным элементам ( особенно противно на tab-ах) - какая экономия кода :) Просто пройтись по массиву и для control-ов c непустыми тагами сделать нужный выбор visible/enabled что-то типа
Аналогично - по содержанию тагов - тюнинг при resize...

18-я весна ... а то имя класса которое Вам нужно (u_dw) можно узнать из dw_1.ClassDefinition.Ancestor.Name

Было бы красиво. Но у меня PB9 на такую конструкцию выдал ошибку компилятора

Не работает. В общем случае.

Если UserObject , родовое имя которого вам требуется знать, "лежит" не на текущем окне, а на одном из его ancestor-ов. В таком случае ваш код вернет строку типа
"w_sheet_one_datawindow`dw_one"
И это правильно - это и есть ancestor 1-го порядка для заданного обьекта.
Чтобы увидеть все уровни наследования - откройте какой-нибудь event на datawindow.
Над полем редактора - три выпадающих списка - посмотрите самый крайний справа.

Чобы добраться до original - Нужен цикл


Проверка POS(lcd.name,'`')<1 нужна - иначе цикл пойдет уже по ancestor-ам самого UserObject-а
а не окна/userobjecta на котором он лежит.

В принципе для этого и нужна отдельная функция.
Но все таки не проще ли ?