Lade...
 

SetPrinter

SetPrinter

SetPrinter

Parameter: keine

Stack
Stack Position Beschreibung
Stack(In) Top -
Stack(Out) Top TRUE/FALSE

Öffnet den Standard-Druckdialog zur Auswahl des Druckers. Wird die Auswahl abgebrochen, wird FALSE zurückgegeben. Der nun eingestellte Drucker ist für alle folgenden PrintDocument Anweisungen festgelegt.

// Ask the user for the printer:

SetPrinter

ifnot return //

If the user aborted the selection, return!

Document(60, 5) -> printList

// set parameters for printing:

// Set left top corner to x=10 and y=5 (ORIGIN)

// set the right bottom corner to x=-5 and y=-5 (PAGE) (see graphic above)

[ printList, ORIGIN 10 5, PAGE (-5) (-5) ] SetParameter

// Set parameters for printing

[ 0,

2, printList, HEADER, T("Anlagegüterliste von ", "Asset accounts balances list of ")] PutLine
[ printList, HEADER, cyberEnterprise Copy(partner.name) ] PutLine
[ printList, FONT 7, Widget(, ListBox) ] PutLine
printList PrintDocument

 

Eine automatische Vorauswahl des Druckers ist über den Drucker-Manager

möglich. Dies ist z.B. beim Labeldruck praktisch. Labeldrucker haben im

Druckernamen üblicherweise das Wort "Label", was direkt gesucht werden kann.

Define(GetLabelPrinter)

  Var(printer, labelPrinter)
  // Reset label printer variable
  NULL -> labelPrinter
  // Get all printers of client
  GetManager(PRINTER) Call(GetInstalledPrinters) iterate(UNSAFE)
  {
    ->

printer

    // Check if the printer name contains the word "Label"

    printer Copy(printerName) "Label"

StringFind

    if
    {

      printer

-> labelPrinter

      break

    }
  }
  labelPrinter
;

 

Siehe auch