GARANTIR DESCONTO

Fórum Imprimir no word #179003

01/09/2003

0

Estou com um problema neste procedimento:

begin
Word := CreateOleObject(´Word.Basic´);
word.filenew ;
Word.Insert(linhatexto);
end;
if Application.MessageBox(´Deseja Imprimir este documento?´,´Confirmação´,MB_ICONQUESTION+MB_YESNO)=MRYes then
[u:0d77818ef3] word.PrintOut(false); [/u:0d77818ef3]

end;

Na hora de utilizar o comando de impressão (word.PrintOut(false) dá zebra, que comando devo utilizar, pois ele nao está suportando, o arquivo que estou utlizando te em torno de 800kb, aos que me ajudarem ou apenas me visitarem agradeço desde já.


Xiconet

Xiconet

Responder

Posts

30/08/2007

Fjaimesilva

Estou com um problema neste procedimento:

begin
Word := CreateOleObject(´Word.Basic´);
word.filenew ;
Word.Insert(linhatexto);
end;
if Application.MessageBox(´Deseja Imprimir este documento?´,´Confirmação´,MB_ICONQUESTION+MB_YESNO)=MRYes then
*word.PrintOut(false);

end;

Use Assim que vai funcionar

* Troque a linha marcada pelo código abaixo

word.PrintOut (False, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam );


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar