COM 1с + Интермех Search #289796

Здраствуйте. Столкнулся с проблеммой подключения из 1с в САПР Интермех SEARCH в описании указан пример на делфи. Подскажите плиз как релизовать подключение в 1с) _---------------------------- В общем случае порядок работы с функциями Search API следующий: 1. Зарегистрируйте Search COM Server на Вашем компьютере. Для этого нужно хотя бы один раз запустить файл s4.exe. 2. Подключите к тексту Вашей программы модуль с описанием функций Search API. Для Delphi он поставляется вместе с Search, а для других компиляторов сгенерируйте файл с описанием функций, используя файл библиотеки S4.TLB. 3. Объявите глобальную переменную типа ITS4App. Не используйте для этой цели локальные переменные в Ваших функциях, поскольку локальные переменные уничтожаются после завершения самих функций, что приведет к постоянной загрузке и выгрузке Search. Пример: Var s4Application: ITS4App; 4. Создайте класс ITS4App через конструктор сокласса coTS4App. 5. Вызовите функцию Login для проверки готовности Search к работе. Если Login вернет значение, отличное от 1, то Вам нужно организовать опрос этой функции до тех пор, пока Search успешно загрузится (Login=1) или пока пользователь нажмет кнопку Отменить в диалоге авторизации пользователя.