Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 2 203

/ вопрос открыт /

Здравствуйте, эксперты!
Как можно отправить какой нибудь текст на word? вообще как кнему подключиться? Я хочу сделать так: например у меня есть один файл, через моего пргу надо отправит эту файл прогу word, чтобы он открыл этот файл и например надо найти слову "я тут" и его поменять на "я не тут". Как это можно реализовать на делфи?

ElektrinO Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: ElektrinO (статус: Посетитель)
Вопрос отправлен: 17 декабря 2008, 18:26
Состояние вопроса: открыт, ответов: 1.

Ответ #1. Отвечает эксперт: Шичко Игорь

Здравствуйте, ElektrinO!
Если конкретно по вопросу, то реализацию можете посмотреть в приложении.
Более подробно, и другие функции нужно, конечно, смотреть дополнительно.

Приложение:
  1. unit Unit1;
  2.  
  3. interface
  4.  
  5. uses
  6. Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  7.  
  8.  
  9. type
  10. TForm1 = class(TForm)
  11. Button1: TButton;
  12. procedure Button1Click(Sender: TObject);
  13. private
  14. { Private declarations }
  15. public
  16. { Public declarations }
  17. end;
  18.  
  19. var
  20. Form1: TForm1;
  21.  
  22. implementation
  23.  
  24. {$R *.dfm}
  25.  
  26. procedure TForm1.Button1Click(Sender: TObject);
  27. var
  28. Word, Doc: variant;
  29. begin
  30.  
  31. Word.Visible:= True;
  32.  
  33. Doc.Select;
  34. Word.Selection.Find.Forward:=true;
  35.  
  36.  
  37.  
  38.  
  39.  
  40.  
  41. end;
  42.  
  43. end.
  44.  


Ответ отправил: Шичко Игорь (статус: 9-ый класс)
Время отправки: 18 декабря 2008, 07:50
Оценка за ответ: 5

Комментарий к оценке: Работает! Спс вам болшое. Вы мне помогли

Мини-форум вопроса

Всего сообщений: 4; последнее сообщение — 20 декабря 2008, 07:31; участников в обсуждении: 4.
Ученый

Ученый (статус: 8-ой класс), 17 декабря 2008, 18:47 [#1]:

Чет не пойму вопрос..... Вам надо найти "я тут" и заменить в .doc файле?
Anderson N.N

Anderson N.N (статус: 2-ой класс), 17 декабря 2008, 22:21 [#2]:

Вам нужно произвести операции с файлом ... тогда word открывать
незачем сделай через делфи
------------------------------------------------------
Если нужно файл открыть с помощью Word то используй
ShellExecute (для его использования нужно добавить в uses модуль ShellApi)


если же надо открыть файл в Word и еще и редактировать там (ваша программа работает с чужим окном)
Ну тогда поздравляю с геморроем...
Но если вас не пугают трудности тогда читай про
FindWindow и пр...
Мережников Андрей

Мережников Андрей (статус: Абитуриент), 18 декабря 2008, 06:58 [#3]:

to Anderson - о каком геморрое идет речь? Надо использовать OLE Automatisation, а не изобретать велосипед. Тогда и "Релиф" не понадобится

to Elektrino на форуме неоднократно поднимались вопросы о взаимодействии Delphi и MS Office - поищите
ElektrinO

ElektrinO (статус: Посетитель), 20 декабря 2008, 07:31 [#4]:

Спасибо вам вы мне помогли !!!__))

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 22 февраля 2025, 11:45
Выполнено за 0.02 сек.