:: Архив конференции по VFP до 2005 года
как обойтись без Фокса ?
Alexander

Сообщений: 48
Дата регистрации: 18.09.2000
Профи, подскажите, пожалуйста как создать dll в Фоксе, чтобы она возвращала функции типа SYS(2007,"XXX") в другую программу (1С-Пр.7.7)
( и как их ловить
а то надо на 1С реализовать код, написанный в Фоксе, с применением большого количества функций, существующих только в НЁМ.
Ratings: 0 negative/0 positive
RE: как обойтись без Фокса ?
Sergey Titow

Сообщений: 2242
Дата регистрации: 12.09.2000
Кратенько так:
Создаешь проект - mydll
в нем создаешь прогу в которой:
DEFINE CLASS mysys AS custom OLEPUBLIC
PROCEDURE sys_2007
LPARAMETERS cExpr
return sys(2007, cExpr)
ENDPROC
ENDDEFINE
или создаешь библиотеку в которой создаешь класс (лучше custom или container) и в менюхе class->class info ставишь галку у OLEPUBLIC
Строишь DLL
Если предполагается использовать на той же машине, при построении DLL все нужное автоматом зарегистрируется в реестре. Если надо на другой - лучше сделать Setup и прочитать документацию - Chapter 16: Adding OLE

Как до нее добраться из васика:
set foxdll = createobject("mydll.mysys")
lSys = foxdll.sys_2007("Вася")
Ratings: 0 negative/0 positive
RE: как обойтись без Фокса ?
Yuri Abramenkov
Автор
Можно попытаться использовать FPOLE.DLL
Ratings: 0 negative/0 positive


Извините, но у вас нет прав для того, чтобы оставлять сообщения в этом форуме.

On-line: 10 (Гостей: 10)

© 2000-2024 Fox Club 
Яндекс.Метрика