Impriendo con @say...
En una parte de mi c贸digo deseo sacar por impresora una imagen de esta manera:
@2,2 say "ImagenX" bitmap
Y en la impresi贸n solo me sale apenas un cuadradito de apenas 1 cent铆metro cuadrado, donde solo muestra un pedazo del v茅rtice superior izquierdo.
Si alguien sabe a que se debe le agradecer铆a que me de una mano.
@2,2 say "ImagenX" bitmap
Y en la impresi贸n solo me sale apenas un cuadradito de apenas 1 cent铆metro cuadrado, donde solo muestra un pedazo del v茅rtice superior izquierdo.
Si alguien sabe a que se debe le agradecer铆a que me de una mano.
SET DEVICE TO PRINTER
SET PRINTER ON
@2,30 SAY "REPORTE DE EMPLEADO"
@3,2 say "======================================================================="
SELECT EMPLEADOS
@4,3 SAY "Cedula de Identidad:"
@4,23 say THISFORM.TXTCEDULA.VALUE
@5,3 SAY "Nombre:"
@5,23 say THISFORM.TXTNOMBRE.VALUE
@6,3 SAY "Apellido:"
@6,23 say THISFORM.TXTAPELLIDO.VALUE
@7,3 SAY "Telefono:"
@7,23 say THISFORM.TXTTELEFONO.VALUE
@8,3 SAY "Direcci贸n:"
@8,23 say THISFORM.TXTDIRECCION.VALUE
@9,2 say "======================================================================="
@10,3 SAY "Departamento:"
@10,23say THISFORM.TXTDEPARTAMEN.VALUE
@11,3 SAY "Cargo:"
@11,23say THISFORM.TXTCARGO.VALUE
@12,3 SAY "Sueldo:"
@12,23say THISFORM.TXTSUELDO.VALUE
@13,3 SAY "Fecha de Ingreso:"
@13,23say THISFORM.TXTFECHAING.VALUE
@14,3 SAY "Fecha de Egreso:"
@14,23say THISFORM.TXTFECHAE.VALUE
@15,2 say "======================================================================="
SET PRINTER TO
SET PRINTER OFF
set device to screen
thisform.refresh()
