Einzelnen Beitrag anzeigen

phorax

Registriert seit: 20. Sep 2008
12 Beiträge
 
Turbo Delphi für Win32
 
#1

Drucker-Setup in Word (OLE)

  Alt 19. Nov 2009, 20:59
Hallo, liebe Experten!

Mein Programm soll Word-Dokumente über das OLE-Automatisierungsmodul drucken und vor dem Druckbeginn den WORD (!)-Druckerkonfigurationsdialog anzeigen lassen- Der Code sieht so bisher so aus:

Delphi-Quellcode:
try
  // Versuchen, existierende Word-Instanz zu benutzen
  varWordInstanz := GetActiveOleObject('Word.Application');
except
  try
  // Neue Word-Instanz erstellen
    varWordInstanz := CreateOleObject('Word.Application');
  except
    raise Exception.Create('Word kann nicht geöffnet werden!');
  end;
end;
varWordInstanz.Visible := True;
varWordInstanz.Documents.Add(Template := strDokumentvorlagePfad);

// Hier soll der Dialog aufgerufen werden.

// Dokument drucken
if formHaupt.menAutomatischDrucken.Checked then
  varWordInstanz.ActiveDocument.PrintOut(False);
// Dokument schließen
if formHaupt.menAutomatischSchliessen.Checked then
  varWordInstanz.ActiveDocument.Close(0);
Bitte helft mir weiter!
  Mit Zitat antworten Zitat