FiveTech Software tech support forums

... "@K!" ID Ma_Unidad OF oDlgMa REDEFINE GET oLargo VAR nLargo PICTURE "999.999" ID Ma_Largo OF oDlgMa REDEFINE GET oAncho VAR nAncho PICTURE "999.999" ID Ma_Ancho OF oDlgMa REDEFINE GET oPeso VAR nPeso PICTURE "999999" ID Ma_Peso OF oDlgMa REDEFINE GET oObserva ...

... TWINDOW:ACTIVATE( 1114 ) Called from: c:\sicef_desarrollo\bin\Sicefwin.prg => INICIO( 0 ) Este el método SayImage METHOD SayImage( nArriba,nIzq,nAncho,nAlto,xImage,lImage,lPage,nRaster ) CLASS TUtilPrn Local xCor := {},yCor := {},yyCor := {} local hDib, hPal, hBmp DEFAULT lImage := .F. ,; lPage ...

... Averiguar el ancho con nsize:=oPrn:GetTextWidth(alltrim((cpptod)->codigo),oFontnegrita) pero me lo da en pixeles y lo paso a cm así : nancho:=oPrn:Cmtr2Pix(nsize, 0) y despues imprimo la linea normal : oPrn:cmSay( linea,3.6+nancho[1]," - "+alltrim((cpptod)->concepto),nlongitudlineat,nlineactualt,oFont) ...

... con decimales, me funciona muy bien. Por ejemplo : oimagen := TImage():Define(logo.jpg') oPrint:SayImage(Posx(nposx) , Posy(nposy) , oimagen, posx(nancho), posy(nalto)) //------------------------------------------------------------------------------// Posx(valor)//// Devuelve la posicion logica ...

... con decimales, me funciona muy bien. Por ejemplo : oimagen := TImage():Define(logo.jpg') oPrint:SayImage(Posx(nposx) , Posy(nposy) , oimagen, posx(nancho), posy(nalto)) //------------------------------------------------------------------------------// Posx(valor)//// Devuelve la posicion logica ...

... rutina de tu post CajaRound( 1.6 , 15.0 , 3.4, 20.0 ,oPrn,90,90,oPen1,nRGB(250,250,250)) Func CajaRound(nArriba, nIzq, nAbajo, nDerecha, oPrn, nAncho, nAlto, oPen, nColor ) Local xCor := {} , yCor := {} // Pasamos coordenadas de cms a pixel xCor := oPrn:Cmtr2Pix(nArriba,nIzq) yCor := oPrn:Cmtr2Pix(nAbajo,nDerecha) ...

... tinta) y me presenta el siguiente problema al tratar de imprimir un Comprobante de Diario: Si al reporte lo quito todo lo referente a PrnSetSize(nAncho,nAlto) y PrinterSetup(oPrn), me da los resultados correctos como en la imagen cdiario1, pero al darle imprimir, la bendita impresora no imprime ...

ESTABA HACIENDO ESTO
oCol:=xLbx:AddCol() , oCol:cHeader:= cTitulo , oCol:bStrData := bCampo , oCol:nWidth := nAncho ) ,;

AHORA HAGO
oCol:=xLbx:AddColumn( cTitulo , bCampo , cPicture ,,,, nAncho , .F., .F.,,,,,, .F.,,,,, .F.,,, ) , oCol:oHeaderFont:=memvar->oDatos:oFont9 )

... y GRAPH_TYPE_POINTS these new datas have been added: DATA aBarCoors // Array with painted points coordinates {nY, nX, nProfundidad, nAncho, nSerie, nPos, nVal} DATA aPoints // Array with painted points coordinates {nY, nX, nSerie, nPos, nVal} How to use it: - Define the tooltip as ...

Lorenzo,

El texto tiene que mostrarse en una línea ó en múltiples líneas ?

Es muy sencillo redimensionar un diálogo:

oDlg:SetSize( nAncho, nAlto )

... IF nResoAncho > 1024 CamReso ( 1024, 768) ENDIf RETURN nil //***************************************************************** Function CamReso(nAncho, nAlto) Local DM_PELSWIDTH := nHex("80000") Local DM_PELSHEIGHT := nHex("100000") //Local DM_PELSWIDTH := nHex("100000") ...

... sea COM1:, LPT1: o USB001: Si mando previamente a pantalla la impresion todo esta correcto la funcion: ImprDato(oPrn,nSup,1,aEmp[i],,.F.,.T.,4,nAncho,,.F.,.F.,.F.) = oPrn:CmSay(CML*nSup,CMC*nCol,aEmp[i],oFONT,NIL,NIL,NIL,nAlin) // --- Impresion del ticketfunction ImprTicket(cNumFol,nTSub,nTDes,nTTot,nTIva,nTEfe,cTipo)local ...

... ver con las dimensiones o posiciones de mis dialogos o ventanas que creo? Gracias. // --- regresa las coor. de pantalla function CoordenadasPant(nAncho,nAlto) nAncho:=ScrResolution()[1] nAlto :=ScrResolution()[2] return NIL

... a la función en C? ... de este modo para ajustar la fuente se le podría pasar NonClientPutOptions ( [nOpcion], nValor, {"Fuente",nAlto,nAncho}) ... ¿qué os parece? Angel, http://forums.fivetechsupport.com/viewtopic.php?f=3&t=19703&p=103914&hilit=parameter+array+a+function+c#p103915 ...

... a la función en C? ... de este modo para ajustar la fuente se le podría pasar NonClientPutOptions ( [nOpcion], nValor, {"Fuente",nAlto,nAncho}) ... ¿qué os parece?