Что возвращает ObjPtr, (VarPtr, и т.д.) ?

Добрый день.
Не подскажет ли кто-нибудь:
Как получить то, что возвращает нам наша дорогая и недокументированная :

ObjPtr

Но только из WinAPI ???
(или ещё откуда) ?

0

Тогда идите в 1C раздел форума и узнавайте как получить указатель на 1C функцию.

Я там уже был - Глухо среди бухгалтеров...

Самая первая из трёх (vbdll которая)

Dim WithEvents z As CTest

Говорит: Определяемый пользователем тип не определён.

Что я опять торможу ???
И никакой WithEvents работать не будет с CreateObject (опять же если это не я туплю).

попытаться из скомпилированной библиотеки вызвать интерпритируемую функцию

Затрудняюсь на это ответить.
Та фуня, которая Moj_Funj - интерпретируемая она иль нет, не знаю...

0

Сообщение от Gazzi Говорит: Определяемый пользователем тип не определён.

В референсах подключи DLL.

Сообщение от Gazzi И никакой WithEvents работать не будет с CreateObject (опять же если это не я туплю).

При чем тут CreateObject вообще?

0

Какие ещё могут быть референсы ????????????????
Весь базар ведётся про CreateObject, с самого первого листа ! И про позднюю вязку.
Где Кто видел в эске референсы ???

0

Сообщение от Gazzi Какие ещё могут быть референсы ????????????????

Project->References. Ты задал вопрос в ветке VB6, попросил сделать код в VB6 и вызвать из DLL в программе на VB6.

Сообщение от Gazzi Весь базар ведётся про CreateObject, с самого первого листа ! И про позднюю вязку.

Вероятно до тебя туго доходит, при чем тут CreateObject и поздняя связка? Во-вторых раз уж на то пошло в 3-м примере используется позднее связывание.

Сообщение от Gazzi Где Кто видел в эске референсы ???

Спроси тут.

0

Именно так я и поступал (как в 3-м примере).
Ну и где-же нам взять (пусть это будет Me) из API ???
"Внутри" нашего объекта, что бы был указатель на "список интерфейсов (или что там ещё) ???

Добавлено через 12 минут
А теперь представь пжлста:
Запрещено нам в форме использовать волшебное Me (и Ptr-ы тоже).
Но мы можем их "во всю" использовать в своей DLL-ке.

Как нам выкрутиться из этой ситуации ?

0

Получайте указатель на функцию, а не на объект. Чтобы ее вызывать достаточно знать адрес и список аргументов. Это в теории, но мне неизвестно как устроены функции в 1C.

0

Сообщение от Gazzi пусть это будет Me

Про Me - это твое первое упоминание за почти 50 постов.
Понятия не имею как в 1С получить ссылку на себя. Первая ссылка в гугле - ЭтотОбъект.

Сообщение от Gazzi Как нам выкрутиться из этой ситуации ?

Выкрутится можно многими способами. Не знаю что и как в 1С, поэтому гадать не буду. К тому же я думаю что 1С прекрасно работает с ActiveX поэтому решений было уже предоставлено достаточно. Гадать и подбирать решения нет никакого желания.

0

Сообщение от Gazzi прога уже будет в ехе-формате.

Бейсик 1С это компилятор? Я просто не в курсе, но вроде это обычный интерпретатор, более того, вроде как урезанная калька с VBA, только русифицированный.

0

Да он вроде как бы при старте компилируется, но никакой exe не создаётся, где то в своей IDE сидит, непонятно
в каком виде. (Опять, если только я ничего не напутал, и вам не приврал).
Он не то что урезанный, он натурально-кастрированный русский бейсик.
Да плюс ко всему - периодически "выскакивают" всякие недокументированности, на которые ответы шиш получишь.

0

Если 1C поддерживает получение событий или callback функцию от ActiveX объекта, то вероятно проще всего будет сделать через неё, например, вызывать ту или иную функцию в 1C в зависимости от ID в пришедшем аргументе.

Gazzi, давайте я погуглю за вас, это ведь так сложно:
Примеры dll компонент с исходным кодом с событиями 1C хоть отбавляй.
Документация разработчика Предприятие 7.5, 7.7, 8.0 Технология создания внешних компонент

1

вызывать ту или иную функцию в 1C

Ну а мы тут чем занимались целых 50-постов ?

Если 1C поддерживает получение событий или callback функцию от ActiveX объекта

Да, она поддерживает callback функцию (одну) исключительно в открытом (и по моему только активном) окне,
(это такое окно, которое сидит внутри IDE, вроде MDI по научному называется). Совершенная чушь.
Бухгалтезер будет всегда держать запущенным/активным твоё окно ?
А надо сделать "в тени". Пришла инфа с сайта, что нашелся чел, который что-то купил, сними товар с Базы,
ну можешь чо-нибудь в трей отправить (для красоты).

Ёперная 1С тоже умеет работать с OLE - но только в одну сторону. А чтоб она научилась в обе стороны, для этого
нам должны либо кое-что раздокументировать (но этого никто не хочет делать), либо мы должны самостоятельно
получить указатель на VTable в объекте-родителе нашего чудо-VBобъекта.
(И то ещё не факт что получиться), но мы не смогли этого сделать.

давайте я погуглю за вас

Ну и много там нагуглили на тему "Вызови в обратку Мою_Фуню в 1С" ?
Или вы думаете я сюда "припёрся" с пустой головой и пуржу тут всем мозг ?

У меня в запасе есть ещё таймер (который тоже почему-то может быть только один в эске). А туда какой-то лось
уже забил какую-то свою обработку, изучать ход его мыслей - неохота. Вот на нём я пока и сделал, моя часть
обрабатывается, лосёвая периодически соскакивает, быхгалты-рычат.
У меня в запасе есть ещё один метод, например соскочить а ASM и обнаружить-таки там на стеке адресок возврата,
только не на VTable а на следующий оператор в "той самой" Моей_Фуне.
У меня в запасе есть ещё один глупый метод: Из своего же объекта "в обратную" сторону вызвать вторую копию эски.
(ну ведь чушью отдаёт), или включить навстречу DDE.

Что-то мне подсказывает: Тут решение где-то "под носом" (наверное). И тот(1С) и этот(VB) вполне себе OLE-объекты,
вполне должны знать друг о друге (где какая фуня "засела").

0

Сообщение от Gazzi Или вы думаете я сюда "припёрся" с пустой головой и пуржу тут всем мозг ?

Да. Ты "припёрся" в ветку по VB6 и спрашиваешь тут про 1С. К тому же 1С прекрасно обрабатывает события от ActiveX контролов. Если ты не знаешь как обрабатывать события в 1С, тебе сказали где это можно спросить.

1

Я припёрся в ветку по VB6 и спрашиваю тут про то, как найти некий указатель в VB6 !
И ни разу здесь ни у кого не спросил про 1С (а только отвечал на вопросы по 1С) !
(И заметь, не получил ответа).

0

Сообщение от Gazzi Я припёрся в ветку по VB6 и спрашиваю тут про то, как найти некий указатель в VB6 !

Тебе дали ответ.

Сообщение от Gazzi И ни разу здесь ни у кого не спросил про 1С (а только отвечал на вопросы по 1С) !

:

Сообщение от Gazzi Засунь этот код в эску - и он нифига там не сработает !!!

Сообщение от Gazzi Где Кто видел в эске референсы ???

Сообщение от Gazzi (И заметь, не получил ответа).

Что спрашивал - на то тебе и ответили.

0

Сообщение от Gazzi Ну а мы тут чем занимались целых 50-постов ?

Как по мне какой-то хренью занимались. Я прочитал все 50 чисто так ради поржать.

Сообщение от Gazzi Ну и много там нагуглили на тему "Вызови в обратку Мою_Фуню в 1С" ? Или вы думаете я сюда "припёрся" с пустой головой и пуржу тут всем мозг ?

Именно так и думаю.
А если ничего полезного не нашли по моим ссылкам, то теперь даже уверен в этом.

Сообщение от Gazzi Я припёрся в ветку по VB6 и спрашиваю тут про то, как найти некий указатель в VB6 !

Да никто тут вам не подскажет за просто так, потому что в этом разделе не так много программистов 1C. А получить указатель на интерпретируемую функцию 1С из-под VB dll, подключенной к нему, можно несколькими способами:
1) передать из 1C (вот если у вас не "пустая голова" как вы говорите, докажите, что сможете в 1C получить такой адрес)
2) реверс-инжинерингом (чего никто в здравом смысле не будет делать, а вы в посте 53 именно об этом и просите)

Только вот нафига это делать, если нормальные разработчики пишут Add-in с событиями, примеры которых вам давал по ссылке. Это и есть реализация взаимодействия в обе стороны dll и 1C.
Можно было бы как в VBA подключиться к объектной модели и вызвать функцию через неё (но ведь у 1C такого нет?)

От темы отписываюсь, нет желания тратить время на неадекватные ответы.

0