Druckerauswahl mit Kopien

Von Ausgaben mit der Gra-Engine über Generatoren bis zum Export in diversen Formaten

Moderator: Moderatoren

Antworten
Benutzeravatar
Rolf Ramacher
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 1930
Registriert: Do, 09. Nov 2006 10:33
Wohnort: Bergheim
Danksagung erhalten: 3 Mal
Kontaktdaten:

Druckerauswahl mit Kopien

Beitrag von Rolf Ramacher »

Hallo,

ich probier gerade mal etwas aus. Ich möchte das der User die Anzahl der Kopien selbst bestimmen kann.

Wo setzte ich den :enableNumCopies() ein ??

Code: Alles auswählen

 oDlg := XbpPrintDialog():new() 
   // Druckausgabe nicht standardmäßig in Datei umleiten 
   oDlg:enablePrintToFile := .f. 
   oDlg:printToFile       := .f. 
   oDlg:create() 

   // Konfiguriertes Drucker Objekt erzeugen 
   oPrinter := oDlg:display() 
	oPrinter:enableNumCopies:=.t.
   oDlg:destroy() 
   IF oPrinter <> NIL 
		cPrinter:=oPrinter:DevName
		Drucken(cVerz+"\umsatzliste.rtf",cPrinter)
	EndIf
	FAttr("umsatzliste.rtf","H")
	FAttr("umsatzliste.rtf","R")
Return Nil
oder muß dies innerhalb von If Printer sein ??
Gruß Rolf

Mitglied der Gruppe XUG-Cologne
www.xug-cologne.de
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15688
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Beitrag von brandelh »

Hi,

es ist definitiv eine Methode des XbpPrinterDialog() .

Damit wird im Prinzip die Eingabemöglichkeit für Seiten auf diesem freigeschaltet, aber laut Doku gibt es ab und an Probleme ?

Siehe auch XbpPrinterDialog():numCopies

Eventuell nützt dir auch XbpPrinter():setNumCopies(), falls du in deinem Programm die Anzahl anders einstellen kannst.

Allerdings unterstützen nicht alle Drucker per Hardware mehrere Kopien und ob der Spooler das dann selbst macht weiß ich nicht.
Gruß
Hubert
Benutzeravatar
AUGE_OHR
Marvin
Marvin
Beiträge: 12903
Registriert: Do, 16. Mär 2006 7:55
Wohnort: Hamburg
Hat sich bedankt: 19 Mal
Danksagung erhalten: 44 Mal

Re: Druckerauswahl mit Kopien

Beitrag von AUGE_OHR »

hi,
Rolf Ramacher hat geschrieben: ich probier gerade mal etwas aus. Ich möchte das der User die Anzahl der Kopien selbst bestimmen kann.

Wo setzte ich den :enableNumCopies() ein ??

Code: Alles auswählen

   oDlg := XbpPrintDialog():new() 
   // Druckausgabe nicht standardmäßig in Datei umleiten 
   oDlg:enablePrintToFile := .f. 
   oDlg:printToFile       := .f. 
   oDlg:create() 

   // Konfiguriertes Drucker Objekt erzeugen 
   oPrinter := oDlg:display() 
	oPrinter:enableNumCopies:=.t.
   oDlg:destroy() 
   IF oPrinter <> NIL 
		cPrinter:=oPrinter:DevName
		Drucken(cVerz+"\umsatzliste.rtf",cPrinter)
	EndIf
	FAttr("umsatzliste.rtf","H")
	FAttr("umsatzliste.rtf","R")
Return Nil
oder muß dies innerhalb von If Printer sein ??
ich setzte :setNumCopies in meine Function PRINTERPS() ein, da wo ich
auch den Paperbin setzte.

Code: Alles auswählen

oDC:setPaperBin( nPaperBin )
oDC:setNumCopies( nCopies )
oDC:configure()
gruss by OHR
Jimmy
Antworten