[[Waldo]]

Gracias lo solucione con esto:

Código Delphi [-]
  word.ActivePrinter:= g.IMPRESORALASER;