Как прочесть весь документ Word в String

← →
IgoX (2003-12-05 18:56) [0]

Как прочесть весь документ Word в String
Спасибо

← →
hooky-mars (2003-12-05 18:57) [1]

Испльзуй Ole.

← →
IgoX (2003-12-05 19:07) [2]

Нашел вроде так работет
WordApplication1->Connect(); WordApplication1->ShowMe();
TVariant TemplateName = ExtractFilePath(Application->ExeName) + "winword.doc";
TVariant NewTemplate = false;
WordDocument1->ConnectTo(WordApplication1->Documents->Add(&TemplateName, &NewTemplate));
TVariant Template=false,namedot="winword.doc",forn="6", next=wdCell;
WordDocument1->ConnectTo(WordApplication1->ActiveDocument);
wchar_t *d;
WordDocument1->Content->get_Text(&d);

Как прочесть весь документ Word в String Найти похожие ветки