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

Вниз

Помогите создать конвертор из doc в txt............спасибо   Найти похожие ветки 

 
cmapm ©   (2004-04-07 00:56) [0]

Помогите создать конвертор из doc в txt


 
vertal   (2004-04-07 01:15) [1]

Это по-моему гоооораздо проще делать макросом из Word , а не из Delphi. Там просто у Range есть свойство Text .В принципе можно из Delphi , в стандартной поставке есть файлы , определяющие интерфейс c Word - а использовать тогда то же свойство Text у Range.


 
cmapm ©   (2004-04-07 01:18) [2]

Я пробывал открыть его в Memo там он открывает его, но там
какие то эроглефы.... Можно подробнее как через Delphi?


 
Кщд   (2004-04-07 06:17) [3]

cmapm ©   (07.04.04 01:18) [2]
http://www.yandex.ru/yandsearch?rpt=rad&text=Delphi+%2B+Word
+ хорошие статьи  на королевстве дельфи


 
Amoeba ©   (2004-04-07 10:53) [4]


> Я пробывал открыть его в Memo там он открывает его, но там
>
> какие то эроглефы....

Естественно! Не стоили и пытаться. Ничего другого и нельзя было ожидать.
Во всяком случае без помощи самого Word"а не обойтись. Для этого надо использовать OLE автоматизацию. Если думаешь, что можно обойтись без него, то и не думай об этом. Форматы *.doc очень сложные и, насколько знаю, не являются открытыми.


 
KapitanSerg ©   (2004-04-07 12:39) [5]

Перегони Doc в Rtf и открой в TRichEdit, а от туда запиши в текстовый файл RichEdit.Lines.SaveToFile


 
[lamer]Barmaglot ©   (2004-04-07 13:06) [6]

формат может и закрытый но при желании...

http://www.wotsit.org/


 
blackman ©   (2004-04-07 13:45) [7]

>но при желании...
И врагу такого не пожелаешь :)
Версия от версии отличается.


 
VLAD-MAL   (2004-04-07 14:15) [8]

Оч. просто.

- у компонента TWordDoc есть свойство Content, а у него - есть свойство - Text. Все работает, сам пробовал.

MyDoc.Content.Text



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

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

Наверх




Память: 0.48 MB
Время: 0.027 c
1-1082035946
siriusP
2004-04-15 17:32
2004.05.02
Масштабирование Canvas при печати.


11-1066640661
ASilver
2003-10-20 13:04
2004.05.02
TCPServer.SendStream()


14-1081343604
geg
2004-04-07 17:13
2004.05.02
Помогите найти работу в Питере


6-1079032405
Qwer
2004-03-11 22:13
2004.05.02
Обмен данными


14-1081437031
E1
2004-04-08 19:10
2004.05.02
интересный IRC бот :)