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

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

WordApplication1-компонент [D7, WinXP]


Igor2010 ©   (2009-04-16 19:23:00) 

Помогите получить весь текст из 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; - здесь затыка у меня)), получаю только первую букву текста


Anatoly Podgoretsky   (2009-04-17 09:04:00) [1]

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


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


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


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


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


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


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


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


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


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

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


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


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


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


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


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


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

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


Наверх

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