Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Создать документ Word [D6, WinXP]


V l a d i m i r ©   (2004-09-08 16:10:00) 

Здравствуйте! Вот такой, возможно, простой вопрос: требуется при нажатии на кнопку создать документ Word, сделать его видимым, чтобы пользователь мог занести любую информацию и сохранить этот документ...


V l a d i m i r   (2004-09-08 21:10:00) [1]


> YurikGL ©


Большое, огромное спасибо!!!


YurikGL   (2004-09-08 21:02:00) [2]

Забыл...

vr1:TOleVariant


YurikGL   (2004-09-08 21:02:00) [3]

Тьфу

vr1:OleVariant


YurikGL   (2004-09-08 21:00:00) [4]

W1:TWordApplication

   W1.Connect;
   W1.Visible:=true;
   W1.Documents.add(EmptyParam,EmptyParam,EmptyParam,EmptyParam);

//поворачиваем лист
   w1.ActiveDocument.PageSetup.Orientation:=wdOrientLandscape;
//Формируем верхний колотитул    W1.ActiveDocument.ActiveWindow.View.SeekView:=wdSeekCurrentPageFooter;
   w1.Selection.TypeText('Лист ');
   vr1:=wdFieldPage;
   W1.Selection.Fields.Add(W1.Selection.Range,vr1,EmptyParam,EmptyParam);
   w1.Selection.TypeText(' из ');
   vr1:=wdFieldNumPages;
   W1.Selection.Fields.Add(W1.Selection.Range,vr1,EmptyParam,EmptyParam);
   w1.Selection.ParagraphFormat.Alignment:=wdAlignParagraphRight;
   W1.ActiveDocument.ActiveWindow.View.SeekView:=wdSeekMainDocument;

ну и т.д.

//вывод на печать

   W1.ActiveDocument.PrintOut(EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,Empty Param,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);


Чайник   (2004-09-08 18:52:00) [5]

так с этого и надо было начинать, а то открыть ворд и все... это уже OLE..


V l a d i m i r   (2004-09-08 18:48:00) [6]

У меня информация в БД хранится и нужно создать небольшой отчет... Как таблицы добавлять и форматировать ячейки я нашел информацию, а как открыть и сделать видимым - не знаю. Стандартным QReport'ом сделать можно, но он не надежный - вот поэтому нужен ворд.


Чайник   (2004-09-08 18:41:00) [7]

а зачем тебе все это?.. те ведь надо прост запустить ворд, а не общаться с ним...


V l a d i m i r   (2004-09-08 18:25:00) [8]

А как это можно сделать, используя WordApplication и WordDocument?


BillyJeans   (2004-09-08 17:07:00) [9]

CreateOleObject('Word.Application');


Чайник   (2004-09-08 17:04:00) [10]

shellexecute


Наверх

Титульная страница Поиск, карта сайта Написать письмо