FiveTech Software tech support forums

... bmp ) and GetBmpHeight( bmp ). Parameter can be either GDI bitmap handle or GDI+ image pointer. * New: function DrawProgressBar( hDC, aRect, nValue, nTotal, aColors, lBorder ) aColors can be an array of 2 colors, alpha colors, brushes, gradients or an array of 2 bitmaps (handles or pointers) ...

I think this is the function you are looking for.
PrnDuplex( [ nValue ] ) //--> nOldValue

Se me olvidó comentar que al usar DbSeek(nValue,.t.) y no encontrar el valor, el cursor se sitúa en el siguiente registro.
El caso es que el valor aproximado a encontrar puede ser mayor o menor al valor digitado.
Gracias.

In the source printdc.c in function HB_FUNC( PRNDUPLEX ) // ( nValue ) --> nOldValue should be added the line if (pDevMode->dmFields & DM_DUPLEX) to set any nValue only if the duplexprint for the printer is present. Or a second way == ...

... program code. Regards, James ------------------------ Use the method "margin" to change the default 0.2 inch margins. TReport::Margin( nValue, nType, nScale ) --> nil Modify any of the top, left, bottom & right report margins. nValue The value of the new margin to be used. Default ...

... podria alguien colaborar el ejemplo.. procedure main() _main() Fw_SetUnicode( .t. ) _main() return function _Main() local oDlg, oGet local nValue := SPACE(10) SET _3DLOOK ON DEFINE DIALOG oDlg RESOURCE "TestGet" REDEFINE GET oGet VAR nValue PICTURE "@!" ID 110 OF oDlg ...

... to save the footer results to DBF-fields ? For the 1. browser I used calculated values displayed in footers like : oBrw1:aCols[5]:cFooter := nValue[1] because of a index UNIQUE problem. Because of calculated values , I can update the footers. It seems, that it doesn't work using TOTAL 1. ...

... } Summarize When we use &(indexkey(0)) we can’t evaluate an index expression in ADO TABLES “NAME, DDATA, NVALUE” we will get an error but we can issue SQL SELECT like that. Thus we need ADODBF TABLES expression “NAME+DTOS(DDATE )+STR(NVALUE) “ to do it. ...

... needed by the app for its evaluations. When we use &(indexkey(0)) we cant evaluate a index expression in ADO TABLES "name+dDate+nValue" we will get an error but we can issues a sql select like that. Thus we need the ADODBF expression "name+DTOS(dDate)+STR(nValue) to ...

... needed by the app for its evaluations. When we use &(indexkey(0)) we cant evaluate a index expression in ADO TABLES "name+dDate+nValue" we will get an error but we can issues a sql select like that. Thus we need the ADODBF expression "name+DTOS(dDate)+STR(nValue) to ...

... case the replaced value is considered for totalling instead of the original value. Example: oCol:nFooterType := AGGR_SUM oCol:bSumCondition := { |nValue, o| If( oBrw:DRCR:Value == 'D', nValue := -nValue, nil ), .T. } * New: XBrowse METHOD RefreshHeaders() to repaint Headers only. * Fix: database.prg. ...

... small correction in xbrowse.prg. Please locate this line in method MakeTotals()               if Eval( IfNil( :bSumCondition, bCond ), nValue, oCol )  Please make a very minor change like this. ( change nValue as @nValue )               if Eval( IfNil( :bSumCondition, bCond ...

... .OR. CHR(29)$uValue) uValue:=STRTRAN(uValue,CHR(28),"\") uValue:=STRTRAN(uValue,CHR(29),"'") ENDIF RETURN uValue FUNCTION lstr(nValue) RETURN ALLTRIM(STR(nValue))

... NIL FUNCTION cFileTemp(cExt) LOCAL cFile:="tmp"+STRTRAN(LSTR(SECONDS()),".","")+cExt RETURN cFile FUNCTION lstr(nValue) RETURN ALLTRIM(STR(nValue)) FUNCTION GETPAGES(cFileOrg) LOCAL cFileZip :=cFileTemp(".ZIP") LOCAL cFileMime:=cFileTemp(".TXT") ...

... [<nCount>], [<nTargetStart>]) -> aTarget ACos(<nRadians>) -> nArcCosine AddASCII( <cString>, <nValue>, [<nPos>] ) -> cNewString AddMonth( <dDate>, <nMonths> ) -> dNewDate ADel(<aArray>, <nElement>, [<lShrink>]) ...