Проверка на наличие графических объектов

[Dartix]

Добрый день!

Подскажите, пожалуйста, как в MB задать условие проверки таблицы\выборки на наличие в ней графических объектов?
т.е. таблица содержит графические объекты - TRUE,
содержит только табличные данные FALSE

[wasposa]

TableInfo('имя таблицы',5)

[asgs1977]

Встречаются более веселые случаи, когда таблица содержит графические объекты, а её отдельные записи - нет )
Проверить можно так:
Dim A_Obj As Alias
Dim CurObj As Object
A_Obj = "имя_таблицы" + ".obj"
Fetch Rec номер_записи From "имя_таблицы"
if A_Obj then
CurObj = A_Obj
'Чего-то делаем с графическим объектом
end if