Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.11;
Скачать: CL | DM;

Вниз

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

 
marri2005 ©   (2005-06-16 01:27) [0]

Помогите, пожалуйста, советом.

Я пишу программу которая должна заносить данные в Word. Я с ним из Delphi никогда не работала и поэтому бросилась на поиски всех своих вопросов в Интернет. Нашла статью на сайте http://www.kornjakov.ru/stat.htm  (Суперфункции (№21, 2003 год)). У меня все получалось, до момента когда мне понадобилось обратиться к документу лежащему в той же папки, что и моя программа. Этот документ я набрала в Word (Документ1.doc). Автор статьи рассматривает следующую функцию для открытия файла:

Function OpenDoc (file_:string):boolean;
Var Doc_:variant;
begin
OpenDoc:=true;
try
 W.Documents.Open(file_);
except
 OpenDoc:=false;
end;
End;

И обращается к ней так:
……..
procedure TForm1.Button2Click(Sender: TObject);
begin
if CreateWord then begin
 VisibleWord(true);
 If OpenDoc("c:\Шаблон платежного поручения.rtf") then begin
…………….

Но в этом случае существует полный путь к файлу… а как вызвать документ который находится в этой же папки? Пыталась написать If OpenDoc("Документ1.doc") then begin
Ничего не вышло. Помогите советом.

Буду благодарна, за ответ.


 
jack128 ©   (2005-06-16 01:33) [1]

If OpenDoc(ExtractFilePath(ParamStr(0)) + "Документ1.doc")  then



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

Текущий архив: 2005.07.11;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.027 c
3-1117222276
Starcom
2005-05-27 23:31
2005.07.11
Как вычис Кол-во лет имея дату занесения и тек в Paradox...


1-1118734469
Aldor
2005-06-14 11:34
2005.07.11
KEY_ALL_ACCESS и какой-то SYNCHRONIZE


9-1110377372
mr_Coder
2005-03-09 17:09
2005.07.11
Вопрос новичка по GLScene


1-1118833829
MishaVagin
2005-06-15 15:10
2005.07.11
Подключение библиотек во время работы программы


4-1115906675
Tomkat
2005-05-12 18:04
2005.07.11
Управление двунаправленным LPT портом