Seite 1 von 1
Druckerdialog
Verfasst: Fr, 03.12.2010 12:04
von Angelwings
Hallo Leute
,
Ich hab einen Betrag in Writer und wurde auf Basic und Java verwiesen ^^. Naja wusst nicht wie ich den Betrag verschieben kann darum gibt es bei mir jetzt einen Link
viewtopic.php?f=1&t=44920
Ich bin über jede Antwort froh
Re: Druckerdialog
Verfasst: Fr, 03.12.2010 12:29
von Angelwings
Hallo Leute hab den Fehler jetzt selber gefunden
Code: Alles auswählen
' Wenn Wert nicht gesetzt mind. 1 Exemplar
If anz < 1 Then
anz = 1
End If
Dim document As object
dim dispatcher as object
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
If neuerDrucker <> "" Then
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Printer"
args1(0).Value = neuerDrucker
dispatcher.executeDispatch(document, ".uno:Printer", "", 0, args1())
End If
'Options.PrintBackground = False
If Druckerdialog = 0 Then
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Copies"
args2(0).Value = anz
args2(1).Name = "Collate"
args2(1).Value = false
dispatcher.executeDispatch(document, ".uno:Print", "", 0, args2())
else
dim args3() as new com.sun.star.beans.PropertyValue
dispatcher.executeDispatch(document, ".uno:Print", "", 0, args3())
End If
ich Vollhorst hab bei der Druckerwahl ".uno:Print" und nicht ".uno:Printer" geschrieben
Ich entschuldige mich für meine Dummheit *sorry*
Eine Frage hätte ich dann doch noch.
Ist es irgendwie Möglich sich zu merken was der User eingestellt hatte?
Re: Druckerdialog
Verfasst: Mo, 06.12.2010 08:25
von Angelwings
Gibt es wirklich keine Möglichkeit sich die Druckereinstellungen zu merken?
Re: Druckerdialog
Verfasst: Sa, 08.01.2011 13:32
von Ford-Prefekt
Moin,
fürs 'merken' liegen 2 Möglichkeiten nahe.
Im Document - du weist einer bestimmten Zelle einen Wert zu den du auswerten kannst
In einem File - im Prinzip der selbe Weg nur in einer eigenen Datei.
... oder ich habe die Frage nicht richtig verstanden ...
Ford