Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / доступ к объектам Foxpro из VB(VBA) / 2 сообщений из 2, страница 1 из 1
23.11.2004, 15:02
    #32796178
alex;2
alex;2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
доступ к объектам Foxpro из VB(VBA)
Здравствуйте, Уважаемые.
ВОЗМОЖНО ЛИ( и имеет ли смысл искать решение),
передать в VB(VBA) из OLEPUBLIC-объекта foxpro другой OLEPUBLIC-объект с целью использования подсказок(свойств, методов)

Например, у меня:
Ошибка: "Несоответствие типа."
в VB
Код: plaintext
1.
2.
3.
      Dim MO_MAIN As New MyObj.MAIN  
      Dim MO_GV As MyObj.globalvars  
      Set MO_GV = MO_MAIN.GetObject("opvars")
в Foxpro
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
  DEFINE CLASS MAIN AS Container OLEPUBLIC  
  	Cnn = null  
  	PROCEDURE Init()  
  		LOCAL lcRab  
  		SET SAFETY OFF  
  		This.AddObject("oPVars","GlobalVars")  
  	RETURN  
  	ENDPROC  
  	  
  	PROCEDURE DESTROY()  
  	ENDPROC  
    
  	FUNCTION GetObject(lcOName as String) as Object  
  		LOCAL i, tmp  
  		FOR i =  1  TO This.Objects.Count   
  			IF This.Objects(i).Name = UPPER(lconame) then  
  				RETURN this.Objects(i)  
  			ELSE  
  				tmp=MESSAGEBOX("Нет объекта " + lconame, 1 )  
  				RETURN  0   
  			Endif  
  		NEXT i  
  	ENDPROC  
  ENDDEFINE  
    
  DEFINE CLASS globalvars AS Custom OLEPUBLIC  
  	path_default = "C:\GL\DEVELOP\FOX\"  
    
  	PROCEDURE Init  
  ...  
  	ENDPROC  
  ENDDEFINE

MO_MAIN - инициализировался нормально,

НО!!! отладчик не показывает MO_MAIN.opvars

кстати поэтому и использую функцию MO_MAIN.GetObject

и вопрос в тему: если использовать в Init()
Код: plaintext
1.
This.AddObject("oPVars","GlobalVars")
то в VB свойство "oPVars" недоступно по определению?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.11.2004, 15:29
    #32798259
alex;2
alex;2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
доступ к объектам Foxpro из VB(VBA)
нашел сочувтствующих на другом форуме
http://forum.foxclub.ru/read.php?f=5&i=101122&t=101122
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / доступ к объектам Foxpro из VB(VBA) / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]