Ordenar con nDataStrAlign en un XBROWSE

Ordenar con nDataStrAlign en un XBROWSE

Postby jbrita » Thu Jul 21, 2016 1:06 am

Hola Amigos estoy tratando de ajustar cierta informacion a la izquierda y otra a la derecha pero de la misma columna

oBrw1:aCols[1]:nDataStrAlign:= {|| IF( SubStr(aTrabajo[oBrw1:nArrayAt,1],1,5)=="TOTAL",1,3) }

pero no resulta:
ejemplo:
DESCRIPCION CANTIDAD PRECIO TOTAL
AAAAA-1 10 100 1.000
AAAAA-2 10 100 1.000
TOTAL 2.000

BBB-1 10 200 2.000
BBB-2 15 200 3.000
TOTAL 5.000

si se dan cuenta la columa descripcion la ordeno de iquierda y tambien derecha, eso ando buscando
jbrita
 
Posts: 501
Joined: Mon Jan 16, 2006 3:42 pm

Re: Ordenar con nDataStrAlign en un XBROWSE

Postby jbrita » Thu Jul 21, 2016 2:10 am

antonio, se podra hacer esto

saludos
jbrita
 
Posts: 501
Joined: Mon Jan 16, 2006 3:42 pm

Re: Ordenar con nDataStrAlign en un XBROWSE

Postby jbrita » Sat Jul 23, 2016 4:33 pm

amigos no hay nadien en el foro que alguna vez ordeno una informacion de la misma columna a la derecha o izquierda segun condicion:

oBrw1:aCols[1]:nDataStrAlign:= {|| IF( SubStr(aTrabajo[oBrw1:nArrayAt,1],1,5)=="TOTAL",1,2) }

esto no me funciona

saludos
jbrita
 
Posts: 501
Joined: Mon Jan 16, 2006 3:42 pm

Re: Ordenar con nDataStrAlign en un XBROWSE

Postby joseluisysturiz » Sun Jul 24, 2016 12:31 am

jbrita wrote:amigos no hay nadien en el foro que alguna vez ordeno una informacion de la misma columna a la derecha o izquierda segun condicion:

oBrw1:aCols[1]:nDataStrAlign:= {|| IF( SubStr(aTrabajo[oBrw1:nArrayAt,1],1,5)=="TOTAL",1,2) }

esto no me funciona

saludos


Solo por si acaso prueba que ell contenido del array este en mayuscula como con lo que comparas TOTAL, pruebalo asi haber, saludos...

oBrw1:aCols[1]:nDataStrAlign:= {|| IF( SubStr( UPPER( aTrabajo[oBrw1:nArrayAt,1],1,5) )=="TOTAL",1,2) }
Dios no está muerto...

Gracias a mi Dios ante todo!
User avatar
joseluisysturiz
 
Posts: 2064
Joined: Fri Jan 06, 2006 9:28 pm
Location: Guatire - Caracas - Venezuela

Re: Ordenar con nDataStrAlign en un XBROWSE

Postby jbrita » Sun Jul 24, 2016 4:32 pm

no tampoco, tengo todo bien pero no se porque no funciona
for n := 1 to Len( oBrw1:aCols )
oCol := oBrw1:aCols[ n ]
if n == 1
If Len(aTrabajo)#0
IF SubStr(aTrabajo[oBrw1:nArrayAt,1],1,5)=="TOTAL"
oBrw1:nDataStrAlign := 1
ELSE
oBrw1:nDataStrAlign := 3
endif
Endif
next

TAMPOCO FUNCION ASI

saludos
jbrita
 
Posts: 501
Joined: Mon Jan 16, 2006 3:42 pm

Re: Ordenar con nDataStrAlign en un XBROWSE

Postby cnavarro » Sun Jul 24, 2016 5:17 pm

Intenta utilizar esto, a ver si te funciona
( Sería bueno saber la versión de Fw que utilizas )
Code: Select all  Expand view

   oCol:bIndent      := { || IF( SubStr(aTrabajo[oBrw1:nArrayAt,1],1,5)=="TOTAL", 20, 0 }
 
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
 
Posts: 6522
Joined: Wed Feb 15, 2012 8:25 pm
Location: España


Return to FiveWin para Harbour/xHarbour

Who is online

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