Mirate estas direcciones:
http://www.capturebeat.com/Word_97_FAQ.htm
http://www.4d-interactive.dial.pipex.com/raffle/ Other COM programmers are Graham Marshall, Joel Milne, Binh Ly and Deborah Pate
They all know far more about Delphi and COM than I do and frequent the Delphi OleAutomation newsgroup.
Graham Marshall's Delphi /Word / Excel page is http://vzone.virgin.net/graham.marshall/default.htm
Joel Milne's Delphi / Word page is http://www.softmosis.ca/WordFAQ.html
Binh Ly's Delphi / COM page is http://www.techvanguards.com/com/com.htm
Deborah Pate's Delphi Automation page is http://www.djpate.freeserve.co.uk/Automation.htm
o el siguiente trozo de codigo:
Variant MSWord;
MSWord = CreateOleObject("Word.Basic");
MSWord.OleProcedure("AppShow");
MSWord.OleProcedure("FileNew");
MSWord.OleProcedure("Insert", Edit1->Text + "\n");
MSWord.OleProcedure("EditSelectAll");
Variant CurValues = MSWord.OlePropertyGet("CurValues");
Variant SumInfo = CurValues.OlePropertyGet("FileSummaryInfo");
//Work out how many characters we just typed in
MSWord.OleProcedure("Insert", " I Just inserted ");
MSWord.OleProcedure("Insert", SumInfo.OlePropertyGet("NumChars"));
MSWord.OleProcedure("Insert", " characters");
ShowMessage("Press Enter to terminate link to MS Word");
MSWord = Unassigned;
Suerte