FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour TXBRowse - tiene error con picture de Array
Posts: 270
Joined: Fri Nov 11, 2005 07:39 PM
TXBRowse - tiene error con picture de Array
Posted: Wed Mar 21, 2007 05:17 PM
Hola Foro:

Tengo un problema que me tiene complicado, cuando uso el TXBrowse con un arreglo ( array ) de datos, por ejemplo de 6 columnas y deseo que una columna numerica tenga un PICTURE "@E 999,999,999" de miles, para una mejor visualizacion en el browse, NO FUNCIONA !!!

Ser谩 un Bug o un error m铆o , por favor si alguien tiene alguna idea de que pasa, que me de una manita.

 oBrw := TXBrowse():New( oWinh )
 oBrw:SetArray( aDatos, .T. )
         	
 oBrw:aCols[1]:nWidth     := 100
 oBrw:aCols[2]:nWidth     := 350
 oBrw:aCols[3]:nWidth     := 95
 oBrw:aCols[4]:nWidth     := 90
 oBrw:aCols[5]:nWidth     := 90
 oBrw:aCols[6]:nWidth     := 90
	
 oBrw:aCols[3]:nDataStrAlign	:= AL_RIGHT   
 oBrw:aCols[4]:nDataStrAlign	:= AL_CENTER  
 oBrw:aCols[5]:nDataStrAlign	:= AL_RIGHT   
 oBrw:aCols[6]:nDataStrAlign	:= AL_RIGHT   
 oBrw:aCols[5]:cEditPicture := "@E 9,999,999,999" 
 oBrw:aCols[6]:cEditPicture := "@E 9,999,999,999"     ( <== NO  FUNCIONAN !!! )



Estoy usando xHarbour y FWH 2.8

Gracias ,
Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl
Posts: 270
Joined: Fri Nov 11, 2005 07:39 PM
TXBRowse - tiene error con picture de Array
Posted: Thu Mar 22, 2007 04:32 PM

Hola a Todos :

Alguien tiene alguna idea - ser谩 un BUG , le he dado varias vueltas y NADA ???

Alguien usa Array ( arreglos ) y Picture con TXbrowse ??

Saludos ,

Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl
Posts: 840
Joined: Thu Oct 13, 2005 07:05 PM
TXBRowse - tiene error con picture de Array
Posted: Thu Mar 22, 2007 07:50 PM

No uso xBrowse, bueno si, pero por otro lado.

Haz probado haciendo un TRANSFORM() en vez de ponele un picture ????

Saludos

R.F.
Posts: 270
Joined: Fri Nov 11, 2005 07:39 PM
TXBRowse - tiene error con picture de Array
Posted: Thu Mar 22, 2007 08:34 PM

Gracias Rene por responder:

Si lo he hecho. El problema es que hay que hacerlo antes de grabar al Array, pero el dato se convierte en un dato del tipo caracter. Entonces, no se pueden hacer sumas o restas. Lo cual es un grave problema.

No se si existir谩 alguan otra forma ???

Vuelvo a insistir ser谩 un error de la clase ??

Saludos ,

Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl
Posts: 8
Joined: Thu Mar 01, 2007 10:08 PM
TXBRowse - tiene error con picture de Array
Posted: Thu Mar 22, 2007 10:04 PM

Hola Juan:

Si no te entiendo mal tu quieres que se visualice en el browse en el formato que te dar铆a el picture, pero el problema es que, sino me equivoco, '::cEditPicture' es solo para cuando se edita la celda (picture para un get interno que genera el xbrowse) no como mascara de visualizaci贸n.

En tal caso como bien apunta Rene puedes transformar el dato del array con un TRANSFOM antes de activar el XBrowse, o lo mas conveniente para que siga siendo un dato num茅rico es utilizar '::bStrData' que es el codebloc que transforma cada dato a tipo caracter antes de visualizarlo, seria siguiendo tu ejemplo algo as铆:

oBrw:aCols[6]:bStrData:= {|| TRANSFORM( aDatos[oBrw:nArrayAt, 6 ], "@E 9,999,999,999")}

Un saludo,
Ram贸n Avenda帽o.

Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
TXBRowse - tiene error con picture de Array
Posted: Fri Mar 23, 2007 02:23 AM

Hola Juan, efectivamente, existe un error con xHarbour,
esto pasa cuando haces un edit en las celdas del browse.

mas y sin embargo
con harbour va bien.

saludos..

Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
Posts: 270
Joined: Fri Nov 11, 2005 07:39 PM
TXBRowse - tiene error con picture de Array
Posted: Fri Mar 23, 2007 02:28 PM

GRACIAS Ram贸n y Sysctrl por responder.

Ram贸n, tu idea funci贸no PERFECTO !! , no sab铆a esa forma de uso.

Sysctrl, que bueno saber esto, pues me tenia complicado ese error !.
pensaba que era algo m铆o.

Saludos ,

Juan
==> Pasando a FWH16.04 + Harbour32 + BCC70 + PellesC
=> Abandonando FWH 13.7 + xHarbour + BCC582
http://www.mitaller.cl

Continue the discussion