Espacio Interlineal...???
Publicado por Francisco (19 intervenciones) el 18/07/2005 17:37:34
Veamos el siguiente código :
set device to file c:\archivo.txt
@1,1 say 'REPORTE No.15'
@2,1 say 'PRODUCTOS EN EXISTENCIA.'
use productos
go top
do while !eof()
@lin,2 say nombre_producto
@lin,15 say existencias
lin=lin+1
skip
enddo
set device to screen
!copy c:\archivo.txt lpt1
return
Esto me genera un archivo y me lo imprime a un espacio.
PREGUNTA: Cómo hago para imprimirlo a espacio y medio...? aunque le cambio en lin=lin+1.5 me lo agarra a doble espacio ó si hay otra mejor forma sin utilizar el Rerport Form.
Gracias de antemano.
set device to file c:\archivo.txt
@1,1 say 'REPORTE No.15'
@2,1 say 'PRODUCTOS EN EXISTENCIA.'
use productos
go top
do while !eof()
@lin,2 say nombre_producto
@lin,15 say existencias
lin=lin+1
skip
enddo
set device to screen
!copy c:\archivo.txt lpt1
return
Esto me genera un archivo y me lo imprime a un espacio.
PREGUNTA: Cómo hago para imprimirlo a espacio y medio...? aunque le cambio en lin=lin+1.5 me lo agarra a doble espacio ó si hay otra mejor forma sin utilizar el Rerport Form.
Gracias de antemano.
Valora esta pregunta
0