Este es el sitio web histórico de la documentación de 4D. La documentación se está trasladando progresivamente a developer.4d.com |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D v20 R7
SET CURRENT PRINTER
|
SET CURRENT PRINTER ( nomImpr ) | ||||||||
Parámetro | Tipo | Descripción | ||||||
nomImpr | Cadena |
![]() |
Nombre de la impresora a utilizar | |||||
El comando SET CURRENT PRINTER designa la impresora a utilizar para imprimir con la aplicación 4D actual.
Pase el nombre de la impresora a seleccionar en el parámetro nomImpr. Para obtener una lista de impresoras disponibles, utilice de antemano el comando PRINTERS LIST. Si pasa una cadena vacía en nomImpr, se utilizará la impresora actual definida en el sistema.
También puede designar la impresora PDF genérica automáticamente, independientemente de la plataforma, pasando la siguiente constante que se encuentra en el tema Opciones de impresión:
Constante | Valor | Comentario |
Generic PDF driver | _4d_pdf_printer | Nota: esta funcionalidad no está disponible en las versiones 32 bits de 4D.
|
El comando SET CURRENT PRINTER debe llamarse antes de SET PRINT OPTION, de manera que las opciones disponibles correspondan a la impresora seleccionada. Por otra parte, SET CURRENT PRINTER debe llamarse después de _o_PAGE SETUP, de lo contrario los parámetros de la impresora se pierden.
Este comando puede utilizarse con los comandos PRINT SELECTION, PRINT RECORD, Print form y QR REPORT, y se aplica a todas las impresiones de 4D, incluyendo en el modo Diseño.
Los comandos de impresión deben llamarse obligatoriamente con el parámetro > (donde sea pertinente) de manera que los parámetros especificados no se pierdan.
Si la selección de impresora se lleva a cabo correctamente, la variable sistema OK toma el valor 1. Si ocurre lo contrario (por ejemplo si no se encuentra la impresora designada), la variable sistema OK toma el valor 0 y la impresora actual permanece sin cambios.
Creación de un documento PDF bajo Windows:
var $pdfpath : Text
$pdfpath:=System folder(Desktop)+"test.pdf"
SET CURRENT PRINTER(Generic PDF driver)
SET PRINT OPTION(Destination option;3;$pdfpath)
ALL RECORDS([Table_1])
PRINT SELECTION([Table_1];*)
SET CURRENT PRINTER("")
Producto: 4D
Tema: Impresión
Número
787
Creado por: 4D 2003
Modificado: 4D v12
Modificado: 4D v15 R5
Modificado: 4D v20
Manual de lenguaje 4D ( 4D v20 R7)