https://issues.apache.org/ooo/show_bug.cgi?id=121170
Priority: P3
Bug ID: 121170
Assignee: [email protected]
Summary: com::sun::star::awt::XPrinter API does nothing
Severity: normal
Issue Type: DEFECT
Classification: Code
OS: All
Reporter: [email protected]
Hardware: All
Status: CONFIRMED
Version: AOO 3.4.1
Component: code
Product: api
Using the printing API in the AWT module has no efect at all.
The following code does nothing:
REM ***** BASIC *****
Option Explicit
Sub PrinterServer_test
Dim oPrinterServer as Object
oPrinterServer = CreateUnoService("com.sun.star.awt.PrinterServer")
Dim sPrinterNames$()
sPrinterNames = oPrinterServer.getPrinterNames()
If UBound(sPrinterNames) >= 0 Then
Dim oPrinter as Object, n%
oPrinter = oPrinterServer.createPrinter("Cups-PDF")
oPrinter.start("XPrinter API Demo JOB",1,false)
Dim oDevice as Object, oGraphics as Object
For n = 0 To 5
oDevice = oPrinter.startPage()
oGraphics = oDevice.createGraphics()
oGraphics.drawText(0,0,"Hello world in page " + CStr(n+1))
oPrinter.endPage()
Next
oPrinter.end()
oPrinter.terminate()
End If
End Sub
You need a build with the fix to bug 117765 in order to test it with Basic.
--
You are receiving this mail because:
You are the assignee for the bug.
