Dudas sobre TXBrowse

Post Reply
Mike Serra
Posts: 287
Joined: Fri Apr 14, 2006 5:52 pm
Location: Córdoba (España)

Dudas sobre TXBrowse

Post by Mike Serra »

Buenas noches foro!!

Tengo un par de preguntitas, a ver si se puede:

1) Tengo un array anexado a un TXBrowse con 3 campos, el primero autoincremental, un código y un nombre. ¿Cómo puedo en base al primer campo (autoincremental) poner una línea de un color y la otra de otra?

2) En este mismo array, lo he creado para ordenar por columnas y realizar búsquedas incrementales, pero cada vez que pulso sobre una tecla las cabeceras y el selector de registro me desaparecen.

//////////////EL CÖDIGO////////////////

DEFINE DIALOG oDlg RESOURCE "PRUEBAS.TXBROWSE"
redefine button obton1 id 301 of odlg action odlg:end()
oBrw := TXBrowse():New( oDlg )
oBrw:SetArray( acDatos,.t.)
oBrw:aCols[1]:cHeader := " * "
oBrw:aCols[2]:cHeader := "Cabecera 1" + space(5)
oBrw:aCols[3]:cHeader := "Cabecera 2" + space(5)
oBrw:nMarqueeStyle := MARQSTYLE_HIGHLROW
oBrw:nColDividerStyle := LINESTYLE_BLACK
oBrw:nRowDividerStyle := LINESTYLE_BLACK
oBrw:CreateFromResource( 501 )
ACTIVATE DIALOG oDlg center


MUCHAS GRANCIAS
Post Reply