Hi all,
consider the following code:
REM ***** BASIC *****
Sub TestGraphicProvider
'get the graphic obj from file
oProvider = createUnoService("com.sun.star.graphic.GraphicProvider")
Dim oPropsIN(0)as new com.sun.star.beans.PropertyValue
oPropsIN(0).Name = "URL"
oPropsIN(0).Value = "file:///home/paolo/img.png"
oGraph = oProvider.queryGraphic(oPropsIN())
oPipe = CreateUnoService("com.sun.star.io.Pipe")
Dim oPropsOUT(1)as new com.sun.star.beans.PropertyValue
oPropsOUT(0).Name = "OutputStream"
oPropsOUT(0).Value = oPipe
oPropsOUT(1).Name = "MimeType"
oPropsOUT(1).Value = "image/bmp"
oProvider.storeGraphic(oGraph, oPropsOUT())
print oPipe.available 'always 0
End Sub
In my tests, the result of oPipe.available was always 0 were I woud have
espected > 0
Perhaps am I missing something fundamental?
Thank you for any help
Paolo M
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]