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

Вниз

WordApplication1-компонент   Найти похожие ветки 

 
Igor2010   (2009-04-16 19:23) [0]

Помогите получить весь текст из Word-документа

S:="C:\Program Files\Borland\Delphi7\Projects\word\1.doc";

Form1.WordApplication1.Documents.Add(S,EmptyParam,EmptyParam,EmptyParam);
Form1.WordDocument1.ConnectTo(Form1.WordApplication1.ActiveDocument);

S1:=Form1.WordApplication1.Selection.Text; - здесь затыка у меня)), получаю только первую букву текста


 
Сергей М. ©   (2009-04-16 19:44) [1]


> получаю только первую букву


Догадываюсь какую)

Ты макрос-то выделения всего текста вордового документа запиши да посмотри на него внимательно - сразу станет ясно, что ты должен сделать перед строчкой с комментарием  "здесь затыка"


 
Igor2010   (2009-04-16 21:07) [2]


> Ты макрос-то выделения всего текста вордового документа
> запиши


да не писал я не разу макросы :(.....может книгу посоветуйте, а вообще что мне дописать в код нужно?


 
Сергей М. ©   (2009-04-16 21:30) [3]


> не писал я не разу макросы


А и не надо их "писать"..
Ворд сам их запишет)

Меню "Сервис - Макрос - Начать запись .."


 
Igor2010   (2009-04-16 21:56) [4]


> Меню "Сервис - Макрос - Начать запись .."


спасибо очень сильно помогли...пропустил
Form1.WordApplication1.Selection.WholeStory;


 
Сергей М. ©   (2009-04-16 22:02) [5]


> спасибо очень сильно


На здоовье очень сильно


 
Anatoly Podgoretsky ©   (2009-04-17 09:04) [6]

Использование сгенерированых макросов один из основных способов сделать, то чего не умеешь.



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
11-1201248747
Bytes
2008-01-25 11:12
2009.05.31
не могу запустить проект


2-1239329769
trueTRIx
2009-04-10 06:16
2009.05.31
Как заменить курсор на свой


2-1240003513
Gringoire
2009-04-18 01:25
2009.05.31
SQL запрос


2-1240209047
Destroyer
2009-04-20 10:30
2009.05.31
Microsoft SQL Server и Delphi


2-1240165745
daxter
2009-04-19 22:29
2009.05.31
Помогите с indy 9