Поиск:

Ответ в темуСоздание новой темы Создание опроса
> OLE для Word 
:(
    Опции темы
FTTA
Дата 25.12.2012, 00:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 24
Регистрация: 25.10.2011

Репутация: нет
Всего: нет



С помощью последовательности команд 

Код

AnsiString vAsCurDir=GetCurrentDir();
AnsiString vAsCurDir1=vAsCurDir+"\\tmmm1est.doc";
vVarDoc.OleProcedure("SaveAs",vAsCurDir1.c_str());



 в OLE сервере Word можно выполнить действие сохранения файла со стандартным расширением *. Doc. 
А с помощью каких команд можно осуществить конвертацыю *. Doc файла в *. Html перед сохранением, и сохранить в формате *. Html ?


[простая замена *.doc на *.html не работает]
PM MAIL   Вверх
Данкинг
Дата 25.12.2012, 00:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Смотри с помощью записи макроса, как делает сам WORD, и адаптируй для Билдера. Вероятно, какой-то дополнительный параметр при сохранении понадобится.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Riviero
Дата 25.12.2012, 10:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 136
Регистрация: 25.3.2010

Репутация: 2
Всего: 3



Код

vVarDoc.OleProcedure("SaveAs",vAsCurDir1.c_str(), wdFormatHTML);

или 
Код

vVarDoc.OleProcedure("SaveAs",vAsCurDir1.c_str(), Variant(8));

Попробуй так

Это сообщение отредактировал(а) Riviero - 25.12.2012, 12:33
PM MAIL   Вверх
FTTA
Дата 26.12.2012, 00:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 24
Регистрация: 25.10.2011

Репутация: нет
Всего: нет



 smile  smile  smile  smile  smile  smile  smile  smile  smile  smile 
Riviero, кто бы ты ни был спасибо,  smile  ну просто охринительно гигантское спасибо. Второй способ работает, все конвертирует как надо. Правда расширения почему-то так и остается *.doc , но это уже фигня. Там думаю немного поэкспериментирую. над ним и у меня все получится.
PM MAIL   Вверх
Данкинг
Дата 26.12.2012, 01:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Цитата(FTTA @  26.12.2012,  01:38 Найти цитируемый пост)
Правда расширения почему-то так и остается *.doc 

Естественно: ты же сам имя с расширением задаёшь.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
artsb
Дата 26.12.2012, 07:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64



Цитата(FTTA @  26.12.2012,  00:38 Найти цитируемый пост)
Правда расширения почему-то так и остается *.doc

Код

vVarDoc.OleProcedure("SaveAs", ChangeFileExt(vAsCurDir1, ".htm").c_str(), Variant(8));



--------------------
Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.
PM MAIL   Вверх
FTTA
Дата 10.1.2013, 00:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 24
Регистрация: 25.10.2011

Репутация: нет
Всего: нет



Решил не "какать" на форуме и пишу в той же теме. 
Я создал несколько документов


Выбираю необходимый мне
Код

function_select(int n)
    {
    vVarDoc=vVarDocs.OleFunction("Item", n);
    vVarDoc.OleProcedure("Activate");
    }

работаю с ним, а теперь мне надо закрыть его, не закрыв все остальные. Как это сделать?

Спасибо за помощь
PM MAIL   Вверх
Usper
Дата 10.1.2013, 08:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 325
Регистрация: 13.4.2007

Репутация: 15
Всего: 15



Код

vVarDoc.OleProcedure("Close");
?


--------------------
На посохе волшебном нехилый набалдашник, большой такой, огромный, нехилый набалдашник.
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »


 




[ Время генерации скрипта: 0.1055 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.