Printerrequester :: Hoch- / Querformat
Verfasst: 10.08.2005 23:47
Moin-moin,
ich habe folgendes Druck-Problem:
Ich habe ein Seitenlayout im Querformat. Nun möchte ich den Anwender nicht die Verantwortung übertragen für jeden Ausdruck seine Druckereinstellungen zu überprüfen, ob diese auch auf 'quer' stehen.
Ich möchte die Seitenausrichtung des (via PrinterRequester) angewählten Druckers prüfen und diese dann für einen Ausdruck auf 'quer' setzen und danach wieder zurück.
Es gibt hier im Forum Lösungsansätze dies über die API-Funktione zu machen, aber wenn ich die Druckereinrichtung über die APIs vornehme, kann ich folgenden die PB-Druckfunktionen nicht benutzen
Der obige Code produziert dann keine Ausgabe bzw. erzeugt eine Programm-Absturz.
Kennt das jemand eine Lösung?
Bis denne
Mr. X
ich habe folgendes Druck-Problem:
Ich habe ein Seitenlayout im Querformat. Nun möchte ich den Anwender nicht die Verantwortung übertragen für jeden Ausdruck seine Druckereinstellungen zu überprüfen, ob diese auch auf 'quer' stehen.
Ich möchte die Seitenausrichtung des (via PrinterRequester) angewählten Druckers prüfen und diese dann für einen Ausdruck auf 'quer' setzen und danach wieder zurück.
Es gibt hier im Forum Lösungsansätze dies über die API-Funktione zu machen, aber wenn ich die Druckereinrichtung über die APIs vornehme, kann ich folgenden die PB-Druckfunktionen nicht benutzen
Code: Alles auswählen
StartPrinting("XXX")
StartDrawing(PrinterOutput())
DrawingMode(1)
;- Seite 1 :: Kopf
If LoadImage(0, "_Logo.TIF")
DrawImage(ImageID(), mm(207), mm(10))
EndIf
DrawingFont(UseFont(#TTF_Arial11B))
Locate(mm(207), mm(37)) : DrawText("Liste ...:")
tmpTXT$ = "KW 30 / 2005"
Locate(mm(287)-TextLength(tmpTXT$), mm(37)) : DrawText(tmpTXT$)
:
:
StopDrawing()
StopPrinting()
Kennt das jemand eine Lösung?
Bis denne
Mr. X