Excel из синей формы не получается запустить.

User

Сообщений: 578 Регистрация: 17.03.2008

г.Волгоград, ООО "ЦМИ", Б-5 3.4,SP12

14.12.2012 16:57:41

Делаю вызов спецфункции из Бэст синей формы (Кадры). Уже дописал её.
Код:

Код
TRY oApp := oleCreateObject( "Excel.Application" ) //ïîïûòêà ñîçäàòü îáúåêò Excel CATCH oErr SayAndWait("Excel не установлен!") lOk:=.F. END

Не работает!!! Ошибка - "Нет функции oleCreateObject"!!!

Помогите пожалуйста!!! (Библиотеку подгрузить ? LoadLibrary() )

К стати, SayAndWait функции тоже нет :(

nordk

User

Сообщений: 5589 Регистрация: 22.11.2007

Санкт-Петербург, ООО "Динамика"

14.12.2012 18:24:19

Вообще странно.
Может вот это Вам поможет?

Код
FUNCTION OleCreateObject(cObject) WIN32_OLEINITIALIZE() // обязательно RETURN CreateHbOleObject(cObject)

nordk User Сообщений: 5589 Регистрация: 22.11.2007 Санкт-Петербург, ООО "Динамика"	#3 14.12.2012 19:42:44 SayAndWait() сразу до свидания. Пользуемся графическими

Саак Шахламджян

User

Сообщений: 578 Регистрация: 17.03.2008

г.Волгоград, ООО "ЦМИ", Б-5 3.4,SP12

11.01.2013 13:08:56

Цитата

nordk пишет:
Вообще странно.

Может вот это Вам поможет?

Код
FUNCTION OleCreateObject(cObject) WIN32_OLEINITIALIZE() // обязательно RETURN CreateHbOleObject(cObject)

Спасибо!!! Помогло!!!

Форум