MetaModule.Parent : MetaModule
Предок

Свойство Parent содержит ссылку на таблицу/вьюху связанную с формой/списком/таблицей.

Procedure OnCreate;
Var
  i : Integer;
  m : MetaModule;
Begin
  For i:=0 to Meta.ModulesCount - 1 Do
  Begin
    m := Meta.Module(i);
    If M.Parent <> Null Then
      Warning(m.Name + ' -> ' + m.Parent.Name);
  End;
End;

© RTIT