Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.02.14;
Скачать: CL | DM;

Вниз

Запуск макроса OpenOffice из Delphi   Найти похожие ветки 

 
Marfusha   (2009-03-23 17:50) [0]

Здравствуйте, товарищи.
Сложилась следующая ситуация. Реализован экспорт из Delphi  в OO Calc. После самого экспорта пытаемся запустить макрос.

OODocument.SetVisible(True);
OODispatcher:=OOServiceManager.CreateInstance("com.sun.star.frame.DispatchHelper ");
OOParams:=VarArrayCreate([0,-1],varVariant);
OODispatcher.ExecuteDispatch(OODocument, "macro:///standart.module1.mymacro","",0,OOParams);
При этом ничего не происходит.
А если в уже открытом файле открыть редактор макроса и попытаться запустить его но получаем ошибку "Вы не можете запустить этот макрос из соображений безопасности", хотя уровень безопасности выставлен на низкий уровень.

И собственно вопрос! :)
Какие есть варианты выхода из ситуации?


 
Cobalt ©   (2009-03-25 11:58) [1]

показать сам макрос?


 
Marfusha   (2009-03-26 10:02) [2]

Да нет.
Не понятно следующее:
1. почему в открытом файле к макросу можно обратится и
Безымянный1/standart.module1.mymacro и Мои макросы/standart.module1.mymacro. И какой из них необходимо вызывать.
2. почему нельзя запустить макрос из редактора.
3. Как получить в Делфи имя окрытого сейчас файла.


 
Cobalt ©   (2009-03-26 11:41) [3]

по 2-му пункту - это будет вызов макроса из макроса, что может потенциально привести к бесконечному вызову друг друга.
Но лучше почитать по этому поводу документацию.



Страницы: 1 вся ветка

Текущий архив: 2010.02.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.007 c
2-1260731941
Jaroslight
2009-12-13 22:19
2010.02.14
Заполнение ячеек первой строки таблицы датами текущего месяца


4-1228230166
Kirill
2008-12-02 18:02
2010.02.14
Windows-аутентификация в совей программе


2-1260663047
inkakas
2009-12-13 03:10
2010.02.14
использование png и canvas


8-1202838536
SSW
2008-02-12 20:48
2010.02.14
Проблема с back буфером в direct3d


1-1237817783
Дмитрий Белькевич
2009-03-23 17:16
2010.02.14
SHBrowseForFolder открывается пустым