Board index » delphi » To close an open file in MS word

prasad.kulka...@mailcity.com (Prasad Kulkarni)

Delphi Developer
Mon, 08 Nov 2004 20:44:28 GMT

To close an open file in MS word

Hello All,

I have two procedures. In one of the procedure i have written code for
launching MS WORD something like this

Procedure procedure1
begin
 MsWord := CreateOleObject('Word.Application');
 MsWord.Documents.Open('C:\Temp\Test1.doc');
 MsWord.ActiveDocument.SaveAs(C:\Temp\Test2.doc) ;
 MsWord.Visible := True;
end;

This opens the file Test2.doc. Now in the another procedure i want to
rename this file Test2.doc, with the help of "RenameFile" Function.
But if the file Test2.doc is open, it gives an error. How can i close
this file Test2.doc.

Regards
Prasad

 
Borg SevenOfZer

Delphi Developer
Wed, 10 Nov 2004 00:22:54 GMT

Re:To close an open file in MS word


Try :

Quote
>  MSWord:= CreateOleObject('Word.Application');

     MSWord.DisplayAlerts:= False;

Quote
>  MsWord.Documents.Open('C:\Temp\Test1.doc');
>  MsWord.ActiveDocument.SaveAs(C:\Temp\Test2.doc) ;
>  MsWord.Visible := True;

    MSWord.Quit;
    MSWord:= Unassigned;

to close ms word,  >  = your code + miine.

I do not have word installed so I cannot test this.
Thanks
7 of  Zero

Quote
"Prasad Kulkarni" <prasad.kulka...@mailcity.com> wrote in message

news:a8274029.0205230444.5b114547@posting.google.com...
Quote
> Hello All,

> I have two procedures. In one of the procedure i have written code for
> launching MS WORD something like this

> Procedure procedure1
> begin
>  MsWord := CreateOleObject('Word.Application');
>  MsWord.Documents.Open('C:\Temp\Test1.doc');
>  MsWord.ActiveDocument.SaveAs(C:\Temp\Test2.doc) ;
>  MsWord.Visible := True;
> end;

> This opens the file Test2.doc. Now in the another procedure i want to
> rename this file Test2.doc, with the help of "RenameFile" Function.
> But if the file Test2.doc is open, it gives an error. How can i close
> this file Test2.doc.

> Regards
> Prasad

Other Threads

1. Open/Close/Open Word Documents

2. Open and Save files in MS Word as OLE Object from Delphi program

3. Open XLS files in MS-Word via OLE

4. Opening an MS word doc from an Ole object stored in ms access

5. Saving MS Word files / Bmp files/ text / rich text files in SQL Server

6. File Open, File Close Question

7. Close and Open Word/Excel 2000 in D5

8. Closing already Open Word

9. word 97 open /close

10. Word Automation - Find out if file with file name is open