Требутеся помощь. 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 все работает. В чем дело? |
Re: Требутеся помощь. dll и массив. | |
---|---|
Слушатель |
Посмотри COMARRAY()
|
Re: Требутеся помощь. dll и массив. | |
---|---|
zon Автор Сообщений: 20 Дата регистрации: 18.03.2005 |
Огромное спасибо! Все получилось!
(Первый раз делаю дллку.) |
© 2000-2024 Fox Club  |