FiveTech Software tech support forums

Hi Willi,

Please, Try It:

oCN:Backup(aFiles,cDirBack + cFileBak+".bkp",{|cTable,nPos,nTot| oSay:SetText( "Copying "+Upper(cTable)+"..." ), oMtr:Set( (nPos / nTot) * 100 ),SysWait(0.1)})

... ha añadido un nuevo parámetro (séptimo) aCols. Si es especificado sólo estas columnas son impresas en el informe. * Corrección: En el método Del( nPos ) de la clase ButtonBar. El botón borrado todavía aparecía. Solucionado. http://forums.fivetechsupport.com/viewtopic.php?f=3&t=41022&sid=c47a7a97f8515c5993a7719088e15266 ...

... * XBROWSE: - Method Report(): Added new 7th param aCols. If specified, only these columns are printed in the report. * Fix: ButtonBar method Del( nPos ): The deleted button still appears. Fixed. http://forums.fivetechsupport.com/viewtopic.php?f=3&t=41022&sid=c47a7a97f8515c5993a7719088e15266 ...

... clinkSing ) CATCH oErr2 MsgWait("Error al tratar de firmar documento","No firmo",2) retu .f. END END HB_IDLESLEEP( 1 ) nPos:=0 WHILE oIE:ReadyState <> 4 .AND. nPos<20 HB_IDLESLEEP( 1 ) nPos++ END IF nPos>=20 MsgStop("Tiempo de espera superado") ...

... 250, 1 ) ) MenuAddItem( cPrompt, , !oCol:lHide, ( len(::aDisplay) != 1 .or. ocol:nPos != 1 ), GenMenuBlock( ::aCols, nFor ) ) next ENDMENU if ::bkeydown<>nil.and.::nMarqueeStyle==MARQSTYLE_HIGHLCELL MENUITEM "更改字体颜色" ...

... with xHarbour. The AT() function in xHarbour has this syntax: At( <cSearch>, <cString>, [<nStart>], [<nEnd>] ) --> nPos Using Harbour, AT() only supports the first two parameters and will error if the nStart is specified. Is there an alternative syntax for Harbour ...

... consultada en Chrome si da resultados. como usar el Chrome. muchas gracias de antemano Function TCambioSunat(nMes,nAno) local oIe,WshShell,oDoc,nPos, oForm, oObj,cName,oElem,oWait Local mResultado :={} local cUrl := "https://e-consulta.sunat.gob.pe/cl-at-ittipcam/tcS01Alias " local ...

I get error doing oBrw:InsCol( nPos ). This is the line from xbrowse.prg: nWidth += ::ColAtPos( nPos++ ):nWidth + COL_SEPARATOR And this is the error message:   Error description: Error BASE/1081  Argument error: +   Args:     [ ...

... What I really need is to know the position of the currently selected column starting from the first column. nCreationOrder is a sort of column id. nPos is the position starting from the first visible column not from the first column. Any help? EMG Excuse me Enrico. I'm a bit confused. What you ...

I spoke too fast. What I really need is to know the position of the currently selected column starting from the first column. nCreationOrder is a sort of column id. nPos is the position starting from the first visible column not from the first column.

Any help?

EMG

Code: Select all  Expand view

At( <cSearch>, <cString>, [<nStart>], [<nEnd>] ) --> nPos

Please note: for best result you have to use nPos and update nStart accordingly.

EMG

... = {|| ::VScrollSkip( - ::oVScroll:nPgStep ) } // ::oVScroll:bPageDown = {|| ::VScrollSkip( ::oVScroll:nPgStep ) } ::oVScroll:bPos = {|nPos| ::VScrollSetPos( nPos ) } ::oVScroll:bTrack = {|nPos| ::VScrollSetPos( nPos ) } Como veis, he comentado esas dos líneas y el efecto es que se ...

... http://wiki.fivetechsoft.com/doku.php?id=fivewin_class_txbrwcolumn oBrw:ColPos( oCol ) –> nPos Visible position of the column. Can be zero if the column is hidden. oCol:nPos N Actual column position in the browse. If columns is not visible ...

Hola,

no te funciono xq accedes a arraydata y tenes q acceder a oBrw:aSelected ej:

if LEN(oBrw:aSelected) > 0
FOR EACH nPos IN oBrw:aSelected
? oBrw:aArrayData[ nPos, 01 ], oBrw:aArrayData[ nPos, 02 ]
NEXT
endif

Saludos.

... // Se define el MESSAGE de una columna para tomar y dar valores. static function GenDataField( oADODb, nPos ) Local cNameMethod := oADODb:aFldNames[ nPos ] //#ifdef __HARBOUR__ local nClassH := oADODb:ClassH __clsAddMsg( nClassH, cNameMethod, ; { | oADODb ...