powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / траблы с ole
11 сообщений из 11, страница 1 из 1
траблы с ole
    #36338461
noeser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Делаю вот так:

Код: plaintext
1.
2.
3.
oleobject ole1
ole1 = create oleobject
ole1.Visible = True

А билдер (v.9) ругается, что нет такого свойства у ole1.

Как сделать объект ole1 видимым? Помогите, плиззз. И прошу прощения за глупый вопрос.
...
Рейтинг: 0 / 0
траблы с ole
    #36338582
VanoR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
забыли ConnectToNewObject
читайте хелп
...
Рейтинг: 0 / 0
траблы с ole
    #36338613
noeser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
VanoR, и после вот этого коннекта таже самая хрень

Код: plaintext
result = ole1.ConnectToNewObject("com.sun.star.ServiceManager")

Скорее что-то не так делаю с этим опенофисом.
Мне бы табличку увидеть не в самом опенофисе, а в окошке билдера.
...
Рейтинг: 0 / 0
траблы с ole
    #36339533
VanoR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вопервых после result = ole1.ConnectToNewObject("com.sun.star.ServiceManager")
необходимо проверить чему равно result

во вторых для опенофиса не пойдет строка ole1.Visible = True
там нужно писать чтото типа
ole_document.getCurrentController.getFrame.getContainerWindow.SetVisible(True)
...
Рейтинг: 0 / 0
траблы с ole
    #36339745
Фотография Anatoly Moskovsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вобще, если требуется именно в окне PB показать объект, то нужно вставить в окно OLE контрол(из выпадающего списка в тулбаре) и привязать к нему тип OLE объекта.
Тип OleObject тут не причем.
...
Рейтинг: 0 / 0
траблы с ole
    #36340508
noeser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
VanoR, спасибо, надеюсь, что поможет.

Подскажите ещё плиззз, почему вот на этот код выдаётся ошибка "Error calling external object function executedispatch":

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
li_result = io_openoffice.ConnectToNewObject("com.sun.star.ServiceManager")

if li_result <>  0  then
	messagebox("1", "error = " + string(li_result))
	return - 1 
end if

io_desktop = io_openoffice.createInstance("com.sun.star.frame.Desktop")

io_document = io_desktop.LoadComponentFromURL("private:factory/scalc", "_blank",  0 , la_array[])

io_dispatcher = io_openoffice.createInstance("com.sun.star.frame.DispatchHelper")

io_cell = io_openoffice.Bridge_GetStruct("com.sun.star.beans.PropertyValue")
io_cell.Name = "ToPoint"
io_cell.Value = "$A$1"

ia_args[ 1 ] = io_cell

io_dispatcher.executeDispatch(io_document, ".uno:GoToCell", "",  0 , ia_args[])

...
Рейтинг: 0 / 0
траблы с ole
    #36340586
VanoR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
ioFrame = io_document.getCurrentController.getFrame

io_dispatcher.executeDispatch(ioFrame, ".uno:GoToCell", "",  0 , ia_args[])
...
Рейтинг: 0 / 0
траблы с ole
    #36340864
noeser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
VanoR, спасибо, но что-то не помогает, таже самая ошибка выскакивает.
...
Рейтинг: 0 / 0
траблы с ole
    #36341002
VanoR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а сам OOCalc после io_document = io_desktop.LoadComponentFromURL("private:factory/scalc", "_blank", 0, la_array[]) открывается?
...
Рейтинг: 0 / 0
траблы с ole
    #36341011
VanoR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
io_cell = io_desktop.Bridge_GetStruct("com.sun.star.beans.PropertyValue")
...
Рейтинг: 0 / 0
траблы с ole
    #36342460
noeser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
VanoR, спасибо вам.

А я все-таки слепая балда :)
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / траблы с ole
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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