CONTROL BROWSE

Muestra un browse para navegar por un archivo DBF, matriz, hash u objeto tArray.

REDEFINE CONTROL BROWSE <oBrw> [ [ FIELDS ] <Flds,...>] [ARRAY <array>] ;
   [ ALIAS <cAlias> ] ;
   [ ID <nId> ] ;
   [ OF | DIALOG <oDlg> ] ;
   [ FIELDSIZES | SIZES | COLSIZES <aColSizes,...> ] ;
   [ HEAD | HEADER | HEADERS | TITLE <aHeaders,...> ] ;
   [ SELECT <cField> FOR <uValue1> [ TO <uValue2> ] ] ;
   [ ON CHANGE <uChange,...> ] ;
   [ ON [ LEFT ] CLICK <uLClick,...> ] ;
   [ ON [ LEFT ] DBLCLICK <uLDblClick,...> ] ;
   [ ON RIGHT CLICK <uRClick,...> ] ;
   [ FONT <oFont> ] ;
   [ CURSOR <oCursor> ] ;
   [ COLOR | COLORS <nClrFore> [,<nClrBack>] ] ;
   [ MESSAGE <cMsg> ] ;
   [ UPDATE ] ;
   [ WHEN <uWhen> ] ;
   [ VALID <uValid> ] ;
   [ ACTION <uAction,...> ] ;
   [ SEEK <uSeek,...> ] [ EOF ]

@ <nRow>, <nCol> CONTROL BROWSE <oBrw> [ [ FIELDS ] <Flds,...>] [ARRAY <array>] ;
   [ ALIAS <cAlias> ] ;
   [ FIELDSIZES | SIZES | COLSIZES <aColSizes,...> ] ;
   [ HEAD | HEADER | HEADERS | TITLE <aHeaders,...> ] ;
   [ SIZE <nWidth>, <nHeigth> ] ;
   [ OF | DIALOG <oDlg> ] ;
   [ SELECT <cField> FOR <uValue1> [ TO <uValue2> ] ] ;
   [ ON CHANGE <uChange,...> ] ;
   [ ON [ LEFT ] CLICK <uLClick,...> ] ;
   [ ON [ LEFT ] DBLCLICK <uLDblClick,...> ] ;
   [ ON RIGHT CLICK <uRClick,...> ] ;
   [ FONT <oFont> ] ;
   [ CURSOR <oCursor> ] ;
   [ COLOR | COLORS <nClrFore> [,<nClrBack>] ] ;
   [ MESSAGE <cMsg> ] ;
   [ UPDATE ] ;
   [ PIXEL ] ;
   [ WHEN <uWhen> ] ;
   [ DESIGN ] ;
   [ ACTION <uAction,...> ] ;
   [ SEEK <uSeek,...> ] [ EOF ]

Descripción
Muestra un browse para navegar por un archivo DBF, matriz, hash u objeto tArray, esta es la versión en comando de las clases tCAbreBrow. Este comando es prácticamente igual que el comando LISTBOX de la clase tWBrowse de Fivewin, esto permite que si se quiere remplazar el comando LISTBOX por CONTROL BROWSE, únicamente se deberá cambiar LISTBOX por CONTROL BROWSE, y el resto es totalmente transparente, posteriormente se podrá aprovechar las ventajas que tiene tCAbreBrow sobre tWBrowse.
A excepción de las opciones enlistadas a continuación, todas las opciones son las mismas del comando LISTBOX para la clase tWBrowse
<array> Matriz que se quiere mostrar, esta opción muestra la matriz completa, si se quiere mostrar solamente algunos elementos de la matriz, se tendrá que utilizar la opción FIELDS <flds,...>, esta opción no dr puede utlizar junto con FIELDS <flds,...>, es una o la otra
<uSeek> Codeblock utilizado para la busqueda incremental, si no se envía, utiliza la busqueda predefinida, el codeblock recibe dos parámetros:
xSeek - Valor que se va a buscar
nIndex - Número de índice activo, corresponde a los índices registrados del browse (::nIndex)
Devuevle: El valor que se buscara
Ejemplo: { | xSeek, nIndex | if( nIndex == 1, upper( xSeek ), xSeek ) }
EOF Indica si detiene la busqueda si no se encuentra el registro, si no se indica permite seguir buscando hasta final de archivo

Ejemplo

@ 3,3 CONTROL BROWSE oBrw OF oWnd ;
   FIELDS nombre, apellido, telefono ;
   HEAD "Nombre", "Apellido", "Teléfono" ;
   ON INDEX "Nombre", "Apellido" seek upper( xSeek )