Word.application

← →
lewka © (2009-06-18 14:07) [0]

Подскажите пожалуйста можно ли сделать чтобы путь к файлу в ниже приложенном коде прописывать не полностью? Т.Е. сам exe-файл лежит в папке Програ для приводов. Но если я пишу путь просто Info\Engine.doc, то файл не находит программа.
w:=CreateOleObject("word.application"); w.visible:=true; w.Documents.add("H:\Програ для приводов\Info\Engine.doc");

← →
Сергей М. © (2009-06-18 14:10) [1]

Можно.
Но причем здесь Ворд ?

← →
lewka © (2009-06-18 14:18) [2]

w:=CreateOleObject("word.application"); w.visible:=true; w.Documents.add("Info\Engine.doc");
Вот так я пробовал. Но файл не находится. Только с полным путем все нормально

← →
Vitaliy_____ (2009-06-18 14:25) [3]

Если
H:\Програ для приводов - это то место где лежит программа, то можно просто дописать:
w.Documents.add(ExtractFilePath(Application.ExeName)+"Info\Engine.doc");

← →
Dennis I. Komarov © (2009-06-18 14:28) [4]

Значит Info не в рабочей папке...

← →
kakawka (2009-06-18 14:31) [5]

Можно.
w.Documents.add(".\Info\Engine.doc");

← →
lewka © (2009-06-18 14:33) [6]

Спасибо! А вот еще вопросик по поводу word.application: Я работаю с таблицей а файле Engine.doc (загружаю из нее данные в TStringGrid). Модно сделать так, чтобы файл Engine.doc, в то время когда программа считывает данные из таблицы, не открывался, а просто из него взять данные и все. А то сначала открывается Word потом закрывается W.Application.Documents.Close; w.quit; w:=NULL;. Не очень удобно

← →
kakawka (2009-06-18 14:34) [7]

> w.visible:=false;

← →
lewka © (2009-06-18 14:37) [8]

А как обратиться через word.application к редактору формул в Word?

← →
kakawka (2009-06-18 14:42) [9]

Редактор формул - это отдельное приложение и к word.application никакого отношения не имеет. MS Word просто вставляет его объекты в свои документы.
Можно научиться пользоваться гуглом :)

← →
Vitaliy_____ (2009-06-18 14:44) [10]

Как и все с вордом, можно в режиме записи макроса получить код на Visual Basic, а потом переделать его.
У меня для формулы он выдал следующее:
Selection.InlineShapes(1).OLEFormat.DoVerb VerbIndex:=wdOLEVerbPrimary
А дальше надо разбираться :)

А подскажите ссылочку где можно про ето почитать!

Word.application Найти похожие ветки