Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.02.2020, 04:23   #1
archerix
Форумчанин
 
Регистрация: 13.09.2019
Сообщений: 119
По умолчанию Delphi + Word

Здравствуйте, народ.

Когда-то давно занимался этим делом - тогда были еще Дельфи 7 и Офис 2000, все прекрасно работало. Теперь вот попробовал вернуться к этой теме, мучаю Офис 2003 и ХЕ2. Чудеса какие-то происходят. Вот простенькая программка, которая просто открывает Ворд и делает там надпись.

Код:
procedure TForm1.Button7Click(Sender: TObject);
var vsave, vname: OleVariant;
begin
WordApplication1.ConnectKind:=ckNewInstance;
WordApplication1.Connect;
WordApplication1.Visible:=True;
WordApplication1.Documents.AddOld(EmptyParam, EmptyParam);
WordDocument1.ConnectTo(WordApplication1.ActiveDocument);

WordDocument1.Range.Text:='Hello, World!';

vname:='D:\testXE.doc';
//WordDocument1.SaveAs(	vname, EmptyParam, EmptyParam,
//         	            EmptyParam, EmptyParam, EmptyParam,
//                      EmptyParam, EmptyParam, EmptyParam,
//                      EmptyParam, EmptyParam );

//WordDocument1.Close;
WordDocument1.Disconnect;
WordApplication1.Disconnect;
end;
Документ открывается, надпись делается - а после начинаются непонятки. Я не могу сохранить полученный файл ни программно, ни даже вручную, через меню Ворда. Все время выдает ошибку. Кто-то сталкивался с таким?
archerix вне форума Ответить с цитированием
Старый 02.02.2020, 04:48   #2
archerix
Форумчанин
 
Регистрация: 13.09.2019
Сообщений: 119
По умолчанию

Теперь вообще все вдруг заглохло Компоненты с панели пропали, полез в свойства проекта - не дает поставить галку ни для Офиса ХП, ни для 2к. А ругается почему-то про Access
archerix вне форума Ответить с цитированием
Старый 04.02.2020, 13:44   #3
archerix
Форумчанин
 
Регистрация: 13.09.2019
Сообщений: 119
По умолчанию

Что, никто не интересуется этой темой? Ковыряюсь пока сам. Попробовал более новый Офис 2013 (стоял 2003), по крайней мере созданный программно документ можно сохранить вручную, уже прогресс Не понимаю - при попытке сохранить из программы вылетает сообщение, что методы Save и SaveAs "не поддерживаются сервером". Как такое может быть?


Удалось программно сохранить через стандартные компоненты, но только в папку Документы, в другое место не хочет

Последний раз редактировалось archerix; 05.02.2020 в 00:42.
archerix вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
delphi+word_№страницы - подскажите как из delphi обратиться ко 2й странице word чтобы именно на ней вставить текст ? dm12 Общие вопросы Delphi 0 18.12.2019 13:51
StringGrid->Word экспорт. Delphi - Delphi РезедаМуратова Помощь студентам 5 20.01.2018 18:56
Word, Delphi Антон Лысенко Помощь студентам 1 24.11.2012 11:12
Delphi+Word V4ND4LLL Общие вопросы Delphi 2 02.02.2010 17:24
Word Delphi xtc_win64 Общие вопросы Delphi 9 31.07.2009 12:48