Fechar Arquivo do Word
Bom dia pessoal, eu estou utilixando essa lógica para gravar um arquivo .doc.
[i:18d2bc2de8] [color=blue:18d2bc2de8]MSWord:= CreateOleObject (´Word.Basic´);
MSWord.FileNew;//inicia um novo documento
{ Cabeçalho }
MSWord.Font(´Arial Black´);//muda o tamanho da fonte
MSWord.FontSize(14);//muda o tamanho da fonte
MSWord.insert(´PROPOSTA DE TRABALHO´+#13);
MSWord.FontSize( 8 );//muda o tamanho da fonte
MSWord.insert(´Data: ´);
MSWord.FontSize(9);//muda o tamanho da fonte
MSWord.insert(DateToStr(Date));
MSWord.FileSaveAs(Arquivo,3); //Salva o arquivo[/color:18d2bc2de8][/i:18d2bc2de8]
Só que ele não libera o arquivo da memoria, ele fica preso.
Alguém sabe como eu posso liberar o arquivo da memoria?
[i:18d2bc2de8] [color=blue:18d2bc2de8]MSWord:= CreateOleObject (´Word.Basic´);
MSWord.FileNew;//inicia um novo documento
{ Cabeçalho }
MSWord.Font(´Arial Black´);//muda o tamanho da fonte
MSWord.FontSize(14);//muda o tamanho da fonte
MSWord.insert(´PROPOSTA DE TRABALHO´+#13);
MSWord.FontSize( 8 );//muda o tamanho da fonte
MSWord.insert(´Data: ´);
MSWord.FontSize(9);//muda o tamanho da fonte
MSWord.insert(DateToStr(Date));
MSWord.FileSaveAs(Arquivo,3); //Salva o arquivo[/color:18d2bc2de8][/i:18d2bc2de8]
Só que ele não libera o arquivo da memoria, ele fica preso.
Alguém sabe como eu posso liberar o arquivo da memoria?
Blbacelar
Curtidas 0
Respostas
M@rcelo
18/11/2004
Tente no final
MsWord.Quit;
MsWord.Quit;
GOSTEI 0
Blbacelar
18/11/2004
Eu consegui fazer fechar.
Tem q usar
MSWord.AppClose;
Mas obrigado pela atenção
Tem q usar
MSWord.AppClose;
Mas obrigado pela atenção
GOSTEI 0