[Word] Problèmes d'impression
Bonjour à tous,
je veux imprimer un document word, sans faire monter word à l'ecran.
ça marche presque nickel :
- j'ouvre word
- j'ouvre mon document
- j'imprime
- quand je veux faire mon close pour fermer word (de suite), il me met le message "des documents sont en cours d'impression ... si vous fermez word, ces documents ne seront pas imprimés).
Y aurait-il une solution pour attendre que word ait transmis le document en entier à l'imprimante avant de fermer ?
Voici mon code :
Code:
1
2
3
4
5
6
7
8
9
10
11
|
var
OleApplication :variant;
copie : integer;
begin
OleApplication := CreateOleObject('Word.Application');
OleApplication.documents.open(e_lettre.text);
copie:=StrToInt(e_nb_copies.text);
OleApplication.printout(FileName:='',Range:=0,Copies:=copie,Collate:=True);
OleApplication.Documents.Close;
end; |
Merci d'avance.
