Hallo,
am schnellsten kannst Du abfragen ob der Drucker belegt oder frei ist.
sub main
myDoc=ThisComponent
yProperties=mydoc.getprinter()
oPrinterStatus = FindProperty( myProperties, "IsBusy" )
if oPrinterStatus.Value=false then msgbox "OK"
End Sub
Function FindProperty( aArrayOfProperties, cPropName As String ) As
com.sun.star.beans.PropertyValue
For i = LBound( aArrayOfProperties ) To UBound( aArrayOfProperties )
oProp = aArrayOfProperties(i)
If oProp.Name = cPropName Then
FindProperty() = oProp
Exit Function
EndIf
Next
End Function
mfg
Michael
Klaus Diehl schrieb:
Ist es möglich den Status des Standard-Druckers abzufragen, um zB.
festzustellen, ob der Druck fertig ist oder der Drucker betriebsbereit
ist?
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--
FAQ zu Starbasic -> http://www.starbasicfaq.de
Volltextsuche in SO/OOo -> http://www.dannenhoefer.de/down
music.funplayer Datenbank/Player -> http://www.dannenhoefer.de/funplayer
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
