Speichern/Öffnen/Drucken von Dateien

Wie kann man den aktuellen Drucker auslesen?

Dies geht über die Eigenschaften eines Dokumentes und getPrinter. Damit wird der aktuell eingestellte Drucker angezeigt.

sub GetPrinter
   oDoc = ThisComponent
   aPrinterProperties = oDoc.getPrinter()
   oPrinterName = GetProperty(aPrinterProperties, "Name" )
   If IsNull( oPrinterName ) Then
      MsgBox( "Kein Drucker gefunden" )
   Else
      MsgBox( "Der aktuelle Drucker ist: " & oPrinterName.Value )
   EndIf
end sub

Achtung die Subroutine braucht die Funktion GetProperty. Siehe hier