Estoy trabajando con tsbrowse y tengo el siguiente problema. Cuando trabajo con DBF's no tengo inconvenientes pero cuando uso arrays no funciona. Estoy utilizando FWH 2.7. Alguna Idea. Desde ya muchas gracias
Estoy trabajando con tsbrowse y tengo el siguiente problema. Cuando trabajo con DBF's no tengo inconvenientes pero cuando uso arrays no funciona. Estoy utilizando FWH 2.7. Alguna Idea. Desde ya muchas gracias
...
aadd( aArray,{ space(15),Space(30) } )
DEFINE BRUSH oBrush RESOURCE "wood"
REDEFINE BROWSE oLbx ID 103 OF oDlg CELLED ;
COLORS CLR_BLACK, RGB( 255, 255, 235) ;
ALIAS "ARRAY"
oLbx:SetArray( aArray )
oLbx:nHeightCell += 5 //filas
oLbx:nHeightHead += 10 //columnas
oLbx:SetColor( { 9, 10 }, { CLR_BLACK, oBrush } ) // brushed Footers background
oLbx:SetColor( { 5, 6, 4, 15 }, ;
{ CLR_WHITE, CLR_BLACK, ; // cursor
oBrush, ; // brushed headers background
CLR_BLACK }, ; // grid lines
NIL )
ADD COLUMN TO BROWSE oLbx DATA oLbx:nLogicPos() ;
TITLE "Item" ;
SIZE 42 PIXELS ;
3DLOOK TRUE,TRUE,FALSE ;
ALIGN DT_CENTER,DT_CENTER,DT_CENTER;
COLORS CLR_BLACK, CLR_HGRAY
ADD COLUMN TO BROWSE oLbx DATA ARRAY ELEMENT 1;
TITLE "Código" ;
SIZE 100 PIXELS ;
3DLOOK TRUE,TRUE,FALSE ;
ALIGN DT_LEFT,DT_CENTER,DT_CENTER;
COLORS CLR_BLACK, RGB( 255, 255, 235)
ADD COLUMN TO BROWSE oLbx DATA ARRAY ELEMENT 2;
HEADER "Descripción" ;
SIZE 204 PIXELS ;
3DLOOK TRUE,TRUE,FALSE ; // cels, header, footer
ALIGN DT_LEFT,DT_CENTER,DT_CENTER ; // cells, header, footer
COLORS CLR_BLACK, RGB( 255, 255, 235)//COLORS CLR_BLACK, CLR_HGRAY
ACTIVATE DIALOG oDlg CENTEREDy hablando de esto , tengo un detalle con tsbrowse.
En el clasico mastro-detalle, cuando en el detalle ya existen registros (pertenecientes a la llave del maestro, claro) y le agrego mas, funciona ok, el problema viene cuando es el primer registro del detalle , si me lo agrega y lo muestra , peeerooo, al hacer click en el browse desaparece el encabezado mostrando en lugar de este, los datos de ese primer registro , aparentando ser 2 registros, y no me deja acceder a el.
Todo se soluciona saliendo y volviendo a entrar a ese browse, pero quiero darle solucion, con su ayuda oviamente.
de antemano muchas gracias
Pd. tengo las imagenes de lo que hace solo que no supe como ponerlas aqui
Patricio: Te agradezco la respuesta. Voy a probar a ver que resulta. Miguel a veces me ha pasado eso y lo solucione de esta forma
oBrw : Paint()
oBrw : Refresh()
Saludos
Patricio
Funcionó. Es raro porque en fw16 El comando ALIAS 'ARRAY' nunca lo usé y funcionaba. Gracias por todo