FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour problemas con TsBrowse
Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
problemas con TsBrowse
Posted: Fri Dec 22, 2006 12:46 PM

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

Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
problemas con TsBrowse
Posted: Fri Dec 22, 2006 12:56 PM
Horacio

Yo utilizo TsBrowse y funciona muy bien

te adjunto un ejemplo como lo utilizo

...
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 CENTERED


Saludos
Patricio
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 132
Joined: Sun Oct 23, 2005 04:09 PM
tsbrowse
Posted: Fri Dec 22, 2006 06:30 PM

y 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

Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
problemas con TsBrowse
Posted: Wed Dec 27, 2006 06:28 PM

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

Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
problemas con TsBrowse
Posted: Fri Dec 29, 2006 02:10 PM

Patricio

Funcionó. Es raro porque en fw16 El comando ALIAS 'ARRAY' nunca lo usé y funcionaba. Gracias por todo

Continue the discussion