Здравствуйте Morpeh.

вот куски кода:
есть 2 указателя:

TWordApplication *WordApplication;
TWordDocument *WordDocument;

WordApplication = new TWordApplication(Owner);
WordDocument = new TWordDocument(Owner);

// open document
WordApplication->Connect();
WordDocument->ConnectTo(WordApplication->Documents->
              Open((OleVariant)strFileName));
WordApplication->Visible = true;
WordDocument->Activate();

// editing .......

// end 
WordDocument->Disconnect();
WordApplication->Disconnect();

После этого прога пытается закрыть вообще все открытые ворды