|
|
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
Доброго всем времени суток Лисоводы! Столкнулся с проблемой Прочитал в описании следующее ... 2. Подключите к тексту Вашей программы модуль с описанием функций Search API. Для Delphi он поставляется вместе с Search, а для других компиляторов сгенерируйте файл с описанием функций, используя файл библиотеки S4.TLB. ... и пришел за помошью к Вам ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.06.2006, 14:35 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
Ну и в чем вопрос-то? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.06.2006, 14:38 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
... 2. Подключите к тексту Вашей программы модуль с описанием функций Search API. Для Delphi онпоставляется вместе с Search, а для других компиляторов сгенерируйте файл с описанием функций, используяфайл библиотеки S4.TLB. ... Выделеное?!? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.06.2006, 14:40 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
Посмотреть в сторону Object Browser (не путать с Class Browser). ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.06.2006, 14:50 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
Спасибо! Описания, функции и медоды увидел!!!! А как мне создать обьет используя эту tlb ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.06.2006, 14:58 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
Так может все таки задачу опишешь? Про какой объект речь? Где создать? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.06.2006, 15:00 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
Есть програмній комплекс по ведению конструкторской документации на предприятии. InterMech зовут его. в него входят всякие АРМы Есть система взаимодействия всей этой инфо зовут ее Search . Теперь необходимо в VFP8 подключится к этой системе и используя ее API функции достать необходимые данные. Вот немного из Руководства программистов ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.06.2006, 15:22 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
При содзании обьекта выдаеся Окно Логина и потом ошибка OLE сервера, может гдето чегото невключил????? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.06.2006, 15:24 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
У меня, как, наверное, и многих других, нет Интермеха и подсказать что либо наврят ли сможем. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.06.2006, 16:44 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
Думаю, нужно смотреть в сторону DECLARE [cFunctionType] FunctionName IN LibraryName [AS AliasName] [cParamType1 [@] ParamName1, cParamType2 [@] ParamName2, ...] и CREATEOBJECT(ClassName [, eParameter1, eParameter2, ...]) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.06.2006, 15:24 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
Добрый день! Во первых на Вашей машине (и на машинах потенциальных пользователей) должен быть установлен SEARCH и должна при входе в Вашу программу иметься свободная лицензия Подключиться к API SEARCH: IMBERR=0 ON ERROR IMBERR=1 PUBLIC imb IMB=CREATEOBJECT('IMBASE.IMBASEAPPLICATION') IF IMBERR=1 ***сообщение об отсутствии связи с сервером ELSE ***сообщение о задержке в несколько секунд для подключения ***и программная организация этой задержки ENDIF Если все ОК , то получишь окно приглашения ввода логина м пароля (пользователь должен быть зарегистрирован в SEARCH) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.06.2006, 16:29 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
извините - приведенный пример -это пример подключения к API IMBASE (комплекс поставляемый вместе с SEARCH) вам надо заменить строку: IMB=CREATEOBJECT('IMBASE.IMBASEAPPLICATION') ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.06.2006, 16:49 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
нашел нужную строку: imb=createobject('s4.ts4app') ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.06.2006, 16:54 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
2 Sar99 Большое спасибо!!!! Буду пробовать! Если чесно говря, то не надеялся уже! Надеюсь на вашу помошь и позже можно через Е-Mail связаться с вами ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.06.2006, 10:55 |
|
||
|
Кто подскажет как?!?
|
|||
|---|---|---|---|
|
#18+
Добрый день! Связаться конечно можно. Наша контора работает с SEARCH уже 4-й год. СУБД серверная - INTERBASE На базе SEARH и IMBASE пишется (и частично уже эксплуатируется) система управления предприятием (предприятие разрабатывает и производит электронную продукцию для авиации) Сразу скажу, что сама база данных при грамотном подходе позволяет сделать многое напрямую минуя SEARCH API (в частности получить состав комплектующих в спецификации на узел ,выполнить заявку для ОМТС , работа с извещениями на изменение и т п) Конечно надежнее (но медленнее) SEARCH API - ты получаешь новую версию и не заботишься - что разработчик изменил в таблицах базы!!! Программы пишутся на VFP8 и Delfy ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.06.2006, 11:09 |
|
||
|
|

start [/forum/topic.php?fid=41&fpage=252&tid=1591458]: |
0ms |
get settings: |
10ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
44ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
46ms |
get tp. blocked users: |
1ms |
| others: | 215ms |
| total: | 346ms |

| 0 / 0 |
