Druckerauswahl

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

mike6
*****
Beiträge: 479
Registriert: Sa, 06.03.2004 13:58

Druckerauswahl

Beitrag von mike6 »

Hallo,

ich suche ein Makro, dem ich einen bestimmten Drucker und die dazu gehörenden Einstellungen ( Schacht, Größe etc.)
zuordnen kann. Dieses Makro möchte ich später einer Schaltfläche zuordnen.

Ich habe über "Google" leider nichts dazu gefunden.

Betriebssystem: SUSE LINUX
Mit freundlichen Grüßen
mike
Benutzeravatar
komma4
********
Beiträge: 5332
Registriert: Mi, 03.05.2006 23:29
Wohnort: Chon Buri Thailand Asia
Kontaktdaten:

Re: Druckerauswahl

Beitrag von komma4 »

mike6 hat geschrieben:einen bestimmten Drucker und die dazu gehörenden Einstellungen ( Schacht, Größe etc.)
zuordnen kann
Du findest Beispiele in Andrews Makro-Dokument
Cheers
Winfried
aktuell: LO 5.3.5.2 30m0(Build:2) SUSE rpm, unter Linux openSuSE Leap 42.3 x86_64/KDE5
DateTime2 Einfügen von Datum/Zeit/Zeitstempel (als OOo Extension)
mike6
*****
Beiträge: 479
Registriert: Sa, 06.03.2004 13:58

Re: Druckerauswahl

Beitrag von mike6 »

Hallo Winfried,

danke für den Tip. Hab's mal versucht. Bekomme das Drucken auf verschiedenen Druckern auch hin.

Code: Alles auswählen

REM *****************************************************************
REM Author: Andrew Pitonyak (email: andrew@pitonyak.org)
REM *****************************************************************
Sub PrintCurrentDocument
Dim mPrintopts1(), x as Variant
Dim oDocument As Object, oPrinter As Object
oDocument = ThisComponent
Dim mPrinter(0) As New com.sun.star.beans.PropertyValue
mPrinter(0).Name="Name"
mPrinter(0).value="204-D" 
oDocument.Printer = mPrinter()
oDocument.Print(mPrintopts1())
End Sub 
Was mir jetzt noch fehlt, ist die Auswahl von Datei / Drucken [Eigenschaften]:

● Papierformat
● Quer / Hoch - Format
● Gerät / Papiersorte
● Gerät / Vertraulicher Druck


Gibt's da auch noch Literatur?
Mit freundlichen Grüßen
mike
Antworten