FiveTech Software tech support forums

Me pareciera a mi que *nunca* deben usarse coordenadas en pixeles, sino en cm/inchs para abstraer al programa de las diferentes resoluciones de las impresoras. Asi pues usar CmSay() debería ser obligatorio Sabes, me parece que tienes toda la razón, sobre todo por la simplicidad, yo calculaba en el ...

Me pareciera a mi que *nunca* deben usarse coordenadas en pixeles, sino en cm/inchs para abstraer al programa de las diferentes resoluciones de las impresoras.
Asi pues usar CmSay() debería ser obligatorio

Jose El problema es que estas intentando mostrar los textos en CM y estas usando coordenadas de PIXELES Cambia todos los CmSay por Say y te va a funcionar correctamente Estás en lo correcto cmsoft!! Gracias a todos los que amablemente me mandaron ejemplos y ayudas, Karinha, Willi, Groiss, cmsoft, q...

Jose
El problema es que estas intentando mostrar los textos en CM y estas usando coordenadas de PIXELES
Cambia todos los CmSay por Say y te va a funcionar correctamente

Funciona bien con FONT Century. Creo que el problema debe estar en el salto de línea. Muestra una imagen José, por favor. // Printing an ascii file - \SAMPLES\TESTPRN5.PRG#include "FiveWin.ch"FUNCTION Main()   LOCAL oPrn, cText := MemoRead( "testprn5.prg" &#...

Buenos días:
Prueba a cambiar el font por "Arial" a ver que resultados obtienes.
Un saludo
José Luis

Mi estimado, aquí te envío un ejemplo: Function ImpVerDocs(oCn, aDetVen, cNRuc, cNomb, cDirec, cDocumento, dFecha, cHora, cEstado, cAnulad, cGuiaRem, dFecGuia, nTMovi )local oPrn, nLineas, oFontA, oFontE, oFontT, oFont0, nLin, nPag, nLinMax, nItens, nLen,nCont, cLInea, nCont2, nTotal, cTitle...

Muchas gracias Karinha Probé tu código y el resultado es el mismo, no entiendo porqué me imprime solo la línea que separa los recibos y no los textos. Este es el código que ahora uso con tus modificaciones, el resultado es el mismo: FUNCTION ImprimoRecibos( aDatos )   LOCAL oPrn, o...

FUNCTION ImprimoRecibos( aDatos )   LOCAL oPrn, oFonN, i := 0, j := 0, k := 0, nRowStep, nColStep   PRINT oPrn DOC "recibos" FROM USER PREVIEW   DEFINE FONT oFonN NAME "Century Gothic" SIZE 0, 12 OF oPrn // AQUI   oPrn:SetPage(...

Hace mucho que no uso esta clase, pero tengo que crear unos recibos a partir de un array Este es el código que escribí para ello: FUNCTION ImprimoRecibos( aDatos )    local oPrn, oFonN, i:=0, j:=0, k:=0, nRowStep, nColStep        DEFINE FONT oFonN NAME "Century Gothic" SIZE 0,12 OF...

... check with the FiveTech team or Enrico Maria Giordano. See image of what it should look like: Sílvio, hay algún problema con tu HARBOUR o FIVEWIN, consulta con el equipo de FiveTech o con Enrico Maria Giordano. Vea imagen de cómo debería verse: https://imgur.com/Q94QYG4 https://i.imgur.com/Q94QYG4.png ...

... } ; ACTION OrdenPago() DEFINE BUTTON OF oBar ; FILE op:bmp32+"excel32.bmp" TOP ; PROMPT "Excel" ; GROUP LABEL "CONSULTA" ; COLORS CLR_BLACK, CLR_HRED ; TOOLTIP { "Enviar Consulta a Excel", "Consultas" } ; ACTION oBrw:ToExcel() DEFINE ...

Gracias reviso

Saludos Antonio

Gracias por la respuesta, soy nuevo en esto de las aplicaciones Web, leere sobre lo que indicas, hay algun ejemplo de FWH 24.02 o en algun otro lado que pueda tomar como modelo, gracias