:: Архив конференции по VFP до 2005 года
Требутеся помощь. dll и массив.
zon
Автор

Сообщений: 20
Дата регистрации: 18.03.2005
Уважаемые господа!
Что я делаю не правильно?
Неужели невозможно принять/передать из/в собственный dll массив?

DEFINE CLASS clss AS custom OLEPUBLIC
procedure ar_ar(ab)
* и параметры обьявлял и не обьявлял...
* и функцией пытался и процедурой...
DIMENSION ab(2,2)
ab(1,1)=100
ab(1,2)=200
ab(2,1)=21
ab(2,2)=22
* и return ставил и не ставил...
ENDproc
ENDDEFINE

Потом делаю dll.
Затем обращаюсь -

obj1 = CreateObject("klass.clss")
* И external array aa обьявлял и не обьявлял...
DIMENSION aa(1,1)
=obj1.ar_ar(@aa)
FOR i=1 TO ALEN(aa,1)
MESSAGEBOX(aa(i,1))
next

И хоть убейся, не хочет возвращать массив!
Причем, когда без dll все работает.
В чем дело?
Ratings: 0 negative/0 positive
Re: Требутеся помощь. dll и массив.
Слушатель
Посмотри COMARRAY()
Ratings: 0 negative/0 positive
Re: Требутеся помощь. dll и массив.
zon
Автор

Сообщений: 20
Дата регистрации: 18.03.2005
Огромное спасибо! Все получилось!
(Первый раз делаю дллку.)
Ratings: 0 negative/0 positive


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

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

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