Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2010.02.14;
Скачать: [xml.tar.bz2];

Вниз

Запуск макроса 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.004 c
15-1260221418
Юрий
2009-12-08 00:30
2010.02.14
С днем рождения ! 8 декабря 2009 вторник


1-1237819822
Marfusha
2009-03-23 17:50
2010.02.14
Запуск макроса OpenOffice из Delphi


8-1202896327
XProger
2008-02-13 12:52
2010.02.14
FM синтезатор


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


15-1260435077
uniken1
2009-12-10 11:51
2010.02.14
Получено/Передано байт





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский