Вниз
Скачать: CL | DM;

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
А дальше надо разбираться :)


 
lewka ©   (2009-06-18 15:06) [11]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.01 c
2-1244993614
Gumz
2009-06-14 19:33
2009.08.16
Преобразование координат пикселей в градусы


2-1245048658
Б
2009-06-15 10:50
2009.08.16
Наличие клавиатуры.


2-1245675524
dmitry1991
2009-06-22 16:58
2009.08.16
составить Pattern(RegExp)


15-1244745720
DeadMeat
2009-06-11 22:42
2009.08.16
Чат для локалки


15-1244755090
Германн
2009-06-12 01:18
2009.08.16
Вопрос к любителям смотреть кино в дороге.




   Наверх