I confirm the problem "displaying non-printing characters" using LO 3.4.4, Windows 7 prof 64 bit and the following macro:
Sub AktuelleSeiteDrucken
oDoc = ThisComponent
aPrinterProperties = oDoc.getPrinter()
oPrinterName = aPrinterProperties(0)
If IsNull( oPrinterName ) Then
MsgBox( "Kein Drucker gefunden" )
Else
if MsgBox( "Der aktuelle Drucker ist: " & oPrinterName.Value, 1,"Hinweis") = 2 then
exit sub
else
dim aPrintOps(0) as new com.sun.star.beans.PropertyValue
oDoc = ThisComponent oViewCursor = oDoc.CurrentController.getViewCursor() aPrintOps(0).Name = "Pages" aPrintOps(0).Value = trim(str(oViewCursor.getPage())) oDoc.print(aPrintOps())
endif
EndIf
end sub
I confirm the problem "displaying non-printing characters" using LO 3.4.4, Windows 7 prof 64 bit and the following macro: ucken erties = oDoc.getPrinter() ies(0) star.beans. PropertyValue
oViewCurso r = oDoc.CurrentCon troller. getViewCursor( )
aPrintOps( 0).Name = "Pages"
aPrintOps( 0).Value = trim(str( oViewCursor. getPage( )))
oDoc. print(aPrintOps ())
Sub AktuelleSeiteDr
oDoc = ThisComponent
aPrinterProp
oPrinterName = aPrinterPropert
If IsNull( oPrinterName ) Then
MsgBox( "Kein Drucker gefunden" )
Else
if MsgBox( "Der aktuelle Drucker ist: " & oPrinterName.Value, 1,"Hinweis") = 2 then
exit sub
else
dim aPrintOps(0) as new com.sun.
oDoc = ThisComponent
endif
EndIf
end sub
Question: is this the same problem as Bug 40482?