Duda con TsBrowse

Duda con TsBrowse

Postby JoseGS » Tue Feb 16, 2010 5:53 pm

Hola amigos

Para efectos de depuracion del sistema, he incluido un boton que me despliega en un dialogo un browse que contiene todas las DBF activas.

Deseo que al ubicarme en una de dichas DBF y al hacer clic sobre un boton, se me refresque el contenido de esa DBF en otro browse que tengo en el mismo dialogo.

Resumiendo, deseo cambiar la DBF ligada al tsbrowse en tiempo de ejecucion...

Como puedo hacer eso ?

Gracias

Ejemplo:

// Este el esl browse que contiene la lista de las DBF que estan en uso
REDEFINE BROWSE oBrwY ID 702 OF oDlgX
oBrwY:SetArray(aDBF)
ADD COLUMN TO oBrwY DATA ARRAY ELEMENT 1 HEADER "ACT" ALIGN 1,1,1 SIZE 30
ADD COLUMN TO oBrwY DATA ARRAY ELEMENT 2 HEADER "DBFNAME" ALIGN 0,1,1 SIZE 100
ADD COLUMN TO oBrwY DATA ARRAY ELEMENT 3 HEADER "CDX" ALIGN 1,1,1 SIZE 30
ADD COLUMN TO oBrwY DATA ARRAY ELEMENT 4 HEADER "INDEXKEY" ALIGN 0,1,1 SIZE 191
ADD COLUMN TO oBrwY DATA ARRAY ELEMENT 5 HEADER "FILTRO" ALIGN 0,1,1 SIZE 200
oBrwY:SetColor({1,2,3,4,9,10,13,14,5,6,11,12,15}, {CLR_BLACK,{NRGB(210,225,242),NRGB(114,163,230)},CLR_WHITE,nRGB(65,65,65),CLR_HGREEN,CLR_BLACK,CLR_WHITE,CLR_BLACK,CLR_BLACK,{NRGB(255,255,255),NRGB(255,0,0)},CLR_HRED,{NRGB(244,226,170),NRGB(223,154,11)},CLR_BLACK } )
oBrwY:nHeightCell += 6
oBrwY:nHeightHead += 14
oBrwY:oBrush := oBrushX


// este en el arreglo que debe desplegar el contenido de la DBF seleccionada en tiempo de ejecucion en la lista anterior
REDEFINE BROWSE oBrwZ ID 703 OF oDlgX
oBrwZ:SetColor({1,2,3,4,9,10,13,14,5,6,11,12,15}, {CLR_BLACK,{NRGB(210,225,242),NRGB(114,163,230)},CLR_WHITE,nRGB(65,65,65),CLR_HGREEN,CLR_BLACK,CLR_WHITE,CLR_BLACK,CLR_BLACK,{NRGB(255,255,255),NRGB(255,0,0)},CLR_HRED,{NRGB(244,226,170),NRGB(223,154,11)},CLR_BLACK } )
oBrwZ:nHeightCell += 6
oBrwZ:nHeightHead += 14
oBrwZ:oBrush := oBrushX



REDEFINE BUTTON oBtn ID 200 OF oDlgX ACTION _______________________________




gracias
JoseGS
 
Posts: 205
Joined: Wed Sep 02, 2009 3:11 am

Re: Duda con TsBrowse

Postby mmercado » Wed Feb 17, 2010 4:06 pm

Hola José:
JoseGS wrote:Deseo que al ubicarme en una de dichas DBF y al hacer clic sobre un boton, se me refresque el contenido de esa DBF en otro browse que tengo en el mismo dialogo.

Resumiendo, deseo cambiar la DBF ligada al tsbrowse en tiempo de ejecucion...

Quieres mostrar todos los campos de las dbfs en el otro browse?

Un abrazo.
manuelmercado at prodigy dot net dot mx
User avatar
mmercado
 
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

Re: Duda con TsBrowse

Postby JoseGS » Thu Feb 18, 2010 4:54 am

Hola Manuel

Lo que deseo es que en un browse definido en recursos, pueda cambiar la base de datos que estoy desplegando segun la selecciono de una lista de DBFs presentadas en otro browse...

Ej.
Browse 1 lista de DBFs
Browse 2 contenido de la DBF que he seleccionado del browse 1


Gracias
JoseGS
 
Posts: 205
Joined: Wed Sep 02, 2009 3:11 am


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 39 guests