powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Кто подскажет как?!?
15 сообщений из 15, страница 1 из 1
Кто подскажет как?!?
    #33774953
AlikWishin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Доброго всем времени суток Лисоводы!

Столкнулся с проблемой
Прочитал в описании следующее
...
2. Подключите к тексту Вашей программы модуль с описанием функций Search API. Для Delphi он
поставляется вместе с Search, а для других компиляторов сгенерируйте файл с описанием функций, используя
файл библиотеки S4.TLB.
...

и пришел за помошью к Вам
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33774962
Проходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну и в чем вопрос-то?
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33774971
AlikWishin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
...
2. Подключите к тексту Вашей программы модуль с описанием функций Search API. Для Delphi онпоставляется вместе с Search, а для других компиляторов сгенерируйте файл с описанием функций, используяфайл библиотеки S4.TLB.
...
Выделеное?!?
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33775004
Проходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Посмотреть в сторону Object Browser (не путать с Class Browser).
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33775028
AlikWishin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо!

Описания, функции и медоды увидел!!!!

А как мне создать обьет используя эту tlb
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33775034
Проходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так может все таки задачу опишешь? Про какой объект речь? Где создать?
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33775110
AlikWishin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Есть програмній комплекс по ведению конструкторской документации на предприятии. InterMech зовут его. в него входят всякие АРМы
Есть система взаимодействия всей этой инфо зовут ее Search .
Теперь необходимо в VFP8 подключится к этой системе и используя ее API функции достать необходимые данные.

Вот немного из Руководства программистов
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33775113
AlikWishin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
При содзании обьекта выдаеся Окно Логина и потом ошибка OLE сервера, может гдето чегото невключил?????
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33775506
Проходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У меня, как, наверное, и многих других, нет Интермеха и подсказать что либо наврят ли сможем.
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33778053
Снегурка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Думаю, нужно смотреть в сторону

DECLARE [cFunctionType] FunctionName IN LibraryName [AS AliasName]
[cParamType1 [@] ParamName1, cParamType2 [@] ParamName2, ...]

и
CREATEOBJECT(ClassName [, eParameter1, eParameter2, ...])
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33778265
sar99
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день!
Во первых на Вашей машине (и на машинах потенциальных пользователей)
должен быть установлен SEARCH и должна при входе в Вашу
программу иметься свободная лицензия
Подключиться к API SEARCH:
IMBERR=0
ON ERROR IMBERR=1
PUBLIC imb
IMB=CREATEOBJECT('IMBASE.IMBASEAPPLICATION')
IF IMBERR=1
***сообщение об отсутствии связи с сервером
ELSE
***сообщение о задержке в несколько секунд для подключения
***и программная организация этой задержки
ENDIF
Если все ОК , то получишь окно приглашения ввода логина
м пароля (пользователь должен быть зарегистрирован в SEARCH)
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33778348
sar99
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
извините - приведенный пример -это пример подключения
к API IMBASE (комплекс поставляемый вместе с SEARCH)

вам надо заменить строку:
IMB=CREATEOBJECT('IMBASE.IMBASEAPPLICATION')
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33778370
sar99
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
нашел нужную строку:
imb=createobject('s4.ts4app')
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33779764
AlikWishin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
2 Sar99
Большое спасибо!!!!
Буду пробовать!
Если чесно говря, то не надеялся уже! Надеюсь на вашу помошь и позже можно через Е-Mail связаться с вами
...
Рейтинг: 0 / 0
Кто подскажет как?!?
    #33779826
sar99
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день!
Связаться конечно можно.
Наша контора работает с SEARCH уже 4-й год.
СУБД серверная - INTERBASE
На базе SEARH и IMBASE пишется (и частично уже эксплуатируется)
система управления предприятием (предприятие разрабатывает и производит
электронную продукцию для авиации)
Сразу скажу, что сама база данных при грамотном подходе
позволяет сделать многое напрямую минуя SEARCH API
(в частности получить состав комплектующих в спецификации на узел
,выполнить заявку для ОМТС , работа с извещениями на изменение и т п)
Конечно надежнее (но медленнее) SEARCH API - ты получаешь новую
версию и не заботишься - что разработчик изменил в таблицах базы!!!
Программы пишутся на VFP8 и Delfy
...
Рейтинг: 0 / 0
15 сообщений из 15, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Кто подскажет как?!?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]