Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 05.12.2008, 07:28
AD_min AD_min вне форума
Прохожий
 
Регистрация: 18.02.2008
Адрес: Казахстан, г. Усть-Каменогорск
Сообщения: 11
Репутация: 10
По умолчанию экспорт в word

Помогиет пож. мне нужно сделать экспорт текста в word, и желательно нарисовать квадратик для фотографии 3Х4. Заранее спасибо!!!
Ответить с цитированием
  #2  
Старый 05.12.2008, 15:25
Act Act вне форума
Новичок
 
Регистрация: 01.11.2008
Сообщения: 72
Репутация: 10
По умолчанию

интересная темка, послежу за развитием
Ответить с цитированием
  #3  
Старый 05.12.2008, 16:18
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,100
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Идем в фак и смотрим как работать с Вордом через OLE-автоматизацию.
По поводу квадратика 2 варианта. Либо используешь шаблон уже с квадратиком, либо запускаешь запись макросов в ворде, делаешь квадратик и смотришь что надо Ворду сказать что бы получить твой квадратик.
Ответить с цитированием
  #4  
Старый 09.12.2008, 12:46
Аватар для artemavd
artemavd artemavd вне форума
Начинающий
 
Регистрация: 05.08.2008
Сообщения: 115
Репутация: 12
По умолчанию

Автору: откуда надо текст то экспортировать в Word?
Ответить с цитированием
  #5  
Старый 12.12.2008, 15:22
besoft besoft вне форума
Прохожий
 
Регистрация: 12.12.2008
Сообщения: 2
Репутация: 10
По умолчанию

Цитата:
Сообщение от AD_min
Помогиет пож. мне нужно сделать экспорт текста в word, и желательно нарисовать квадратик для фотографии 3Х4. Заранее спасибо!!!

Есть хорошая книга "Василий Корняков. Программирование документов и приложений MS Office в Delphi". Можешь поискать её в интернете.
А так,
1. Открыть Ворд:
Код:
    var  W : variant;
    begin
    try
        W := GetActiveOleObject('Word.Application');
     except
        W := CreateOleObject('Word.Application');
     end;
     W.Visible := True;
2. Создать документ
Код:
        W.Documents.Add;

или открыть существующий
Код:
        W.Documents.Add('C:\My documents\Myfile.doc');

3. Запись текста в документ
Код:
        W.ActiveDocument.Range.InsertAfter('My text');

или

Код:
        W.ActiveDocurnent.Range.InsertBefore('My text'); 

4. Закрыть документ
Код:
        W.Activecocument.Close;

и Ворд
Код:
        W.Quit;
        W:=UnAssigned; 

В книжке всё подробно, понятно и с примерами.
Удачи.

lmikle: Кто не будет пользоваться тегами, тот получит бан!
Ответить с цитированием
Ответ


Delphi Sources

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

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 01:51.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025