А, да, я не указал версию. Извиняюсь.
Я писал на четверке, но и на 3.7 это работает (там только команды типа FINDFIRST в коде надо заменить на FIND('-'). Вариант для этой версии прилагаю). А вот под 3.01 не знаю, я никогда не работал с этой версией (мы начинали с 3.7). Видимо, там еще нет этой виртуальной таблицы, AllObjWithCaption (2000000058). :О(
|