Главная страница
    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.44 MB
Время: 0.004 c
15-1260142278
KilkennyCat
2009-12-07 02:31
2010.02.14
Стены и мармелад


15-1259954884
oxffff
2009-12-04 22:28
2010.02.14
Спасибо.


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


2-1260876051
Boy4uk
2009-12-15 14:20
2010.02.14
графика


1-1237982300
StriderMan
2009-03-25 14:58
2010.02.14
TWinControl.PaintTo() и т.п.





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский