FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour array multidimension a monodimension?
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
array multidimension a monodimension?
Posted: Sun Feb 23, 2014 12:02 AM
Hola.

Tengo un array que devuelve un método:
aEstados:
[1,2]
[2,122]
[3, 5]

pero luego necesito solo la segunda parte de ese array "aEstados":
[2]
[122]
[5]


como hago utilizando Eval para pasar esa segunda parte a un "aEstadosSimple"

gracias.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: array multidimension a monodimension?
Posted: Sun Feb 23, 2014 01:17 AM
No me doy como cuenta utilizarlo...

Code (fw): Select all Collapse
      LOCAL aArray := {{"A", "a1"}, {"B", "b1"} }     
      
       AEval(aArray, {|x,y,z| AAdd(aNuevoArray, aArray[y,2])})
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: array multidimension a monodimension?
Posted: Sun Feb 23, 2014 10:13 AM
goosfancito wrote:No me doy como cuenta utilizarlo...

Code (fw): Select all Collapse
      LOCAL aArray := {{"A", "a1"}, {"B", "b1"} }     
      
       AEval(aArray, {|x,y,z| AAdd(aNuevoArray, aArray[y,2])})



Prueba asi:

Code (fw): Select all Collapse
      LOCAL aArray := {{"A", "a1"}, {"B", "b1"} }     
      
       AEval(aArray, {| x | AAdd(aNuevoArray, x[2])})
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
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: array multidimension a monodimension?
Posted: Sun Feb 23, 2014 11:01 AM
BIEN BIEN!

sabés que estaba haciendo mal? que no declaraba las variable como array.
Code (fw): Select all Collapse
local xx
en vez de 
local xx:={}

GRACIASSS!
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 211
Joined: Wed Jul 16, 2008 12:59 PM
Re: array multidimension a monodimension?
Posted: Mon Feb 24, 2014 03:42 PM
La clase xBrowse tiene esta funcion:

Code (fw): Select all Collapse
function ArrTranspose( aArray, lSquare )


y lo uso asi:

Code (fw): Select all Collapse
LOCAL aArray := {{"A", "a1"}, {"B", "b1"} }   

ArrTranspose(aArray)[2]


Atentamente,

Rolando.
Cochabamba, Bolivia
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: array multidimension a monodimension?
Posted: Mon Feb 24, 2014 05:02 PM

gracias

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 408
Joined: Sun Aug 13, 2006 05:38 AM
Re: array multidimension a monodimension?
Posted: Tue Feb 25, 2014 03:03 PM

Tal vez te pueda servir algo así

aEval( aArray, { | x, y | aArray[ y ] := x[ 2 ] ) } )

Saludos

Quique

Continue the discussion