FiveTech Software tech support forums

...      // B5 182 x 257 mm  If paper size you want matches one of these, please use the suitable constant and use SetPage( nSize ) If you want a totally different size, please let us know the size you want (milli-metres)

...     ,;                             nCol       ,;                             aData      ,;                             nSize      ,;                             aPicture   ,;                             uFont      ,;                             lTotal     ,;          ...

... ) DEFINE BUTTON OF oBar PROMPT "Mainbar.Exit" RESOURCE "exit" ; ACTION Dlg:End() // This need to be oDlg For nSize and oBtnindexes and for almost all others, I don't use any of the settings (Local, Public , ...) I see why the warning, nSize is not set as local. ...

... Meaningless use of expression 'Logical' test1.prg(1744) Warning W0001 Ambiguous reference 'DLG' test1.prg(1757) Warning W0001 Ambiguous reference 'NSIZE' test1.prg(1758) Warning W0001 Ambiguous reference 'NSIZE' test1.prg(1823) Warning W0001 Ambiguous reference 'OBTNINDEXES' Can I see the related ...

... Meaningless use of expression 'Logical' test1.prg(1744) Warning W0001 Ambiguous reference 'DLG' test1.prg(1757) Warning W0001 Ambiguous reference 'NSIZE' test1.prg(1758) Warning W0001 Ambiguous reference 'NSIZE' test1.prg(1823) Warning W0001 Ambiguous reference 'OBTNINDEXES'

... ) Y la linea del prg es un simple say: oExcel:Say(3,1 ,'Matrícula','Arial',09 ,.F. , , , 7 , , , ,1) //METHOD Say( nRow, nCol, xValue , cFont , nSize , lBold , lItalic ,lUnderLine, nAlign, nColor, nFondo , nOrien , nStyle , cFormat ) CLASS TExcelScript Como que "explota" el ole y el ...

... local cUser := "user@servidor.com" local cpassword:= "clave" local rRuta := "/public_ftp/ruta" local CantFiles,nSize:= 0 local oDlg,oSay,oBtnCancel,oMeter,lEnd:=.F.,nAmount,lOk:= .F.,lValRet:= .F. local lReturn := .F. MsgRun( "Connecting to Internet...", ...

... He intentado esto : Imprimir el codigo : oPrn:cmSay( linea,3.6,alltrim((cpptod)->codigo),oFontnegrita) 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 ...

... sólo imágenes de mapas de bits. * Nueva función FW_RecSetHeaders( oRs ) --> aHeaders. (adofuncs.prg) * Nueva función FW_DrawShadow( hDC, aRect, nSize ) --> Dibuja una sombra a lo largo del borde derecho e inferior del rectángulo. (imgtxtio.prg) * Mejora en la clase TXImage (ximage.prg): Nueva ...

... any image source, not only bmps. * New function FW_RecSetHeaders( oRs ) --> aHeaders. (adofuncs.prg) * New function FW_DrawShadow( hDC, aRect, nSize ) --> Draw shadow along the right and bottom edge of the rectangle. (imgtxtio.prg) * Enhancement: TXImage class (ximage.prg): New DATA nShadowSize ...

... If( ::nRows == ::nCols, m_determinant( ::aMatrix ), 0 ) ACCESS IsIdentity Métodos CONSTRUCTOR: METHOD New( aArray ) CONSTRUCTOR METHOD Identity( nSize ) CONSTRUCTOR // --> Matriz Identity de filas nSize y columnas nSize. METHOD Random( nRows, nCols, nMin, nMax, lInteger ) CONSTRUCTOR // nMin ...

... If( ::nRows == ::nCols, m_determinant( ::aMatrix ), 0 ) ACCESS IsIdentity CONSTRUCTOR METHODS: METHOD New( aArray ) CONSTRUCTOR METHOD Identity( nSize ) CONSTRUCTOR // --> Identity matrix of nSize rows and nSize cols. METHOD Random( nRows, nCols, nMin, nMax, lInteger ) CONSTRUCTOR nMin and ...

... If( ::nRows == ::nCols, m_determinant( ::aMatrix ), 0 ) ACCESS IsIdentity CONSTRUCTOR METHODS: METHOD New( aArray ) CONSTRUCTOR METHOD Identity( nSize ) CONSTRUCTOR // --> Identity matrix of nSize rows and nSize cols. METHOD Random( nRows, nCols, nMin, nMax, lInteger ) CONSTRUCTOR nMin and ...

... para recuperarlo lo hago de la siguiente forma: MsgRun( "Guardando documento a archivo...", "Espere por favor", {|| nSize := StrFile( HB_HexToStr( oQryTmp:ARCHIVO ), cFileExtract ) } ) en tu caso podrias usarlo ::oImagen:LoadFromString( HB_HexToStr( oQryTmp:ARCHIVO ...

Günther, the pen-calculation-factor ( GdiPlus ) //New( nTrans, nRed, nGreen, nBlue, nSize, lRound, lAlign ) //nRed := nRGBRed( nColor ) //nGreen := nRGBGreen( nColor ) //nBlue := nRGBBlue( nColor ) oPen := Pen():New( 255, 0, 0, 255 , 8 , .T.) will show a 3 mm pen ...