FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour aScan en un array multidimensional...?
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
aScan en un array multidimensional...?
Posted: Mon Jul 18, 2016 03:20 PM
Hola.
Tengo:
aLista[01] = { 1, 3, 2}
aLista[02] = { 7, 3, 2}
aLista[03] = { 8, 6, 2}
aLista[04] = {10,3,12}

y quiero utilizar el aScan para que me verifique si en la primer columna
tiene un numero...

intente:
Code (fw): Select all Collapse
nPos:= aScan(aLista, { | array | array[1] == 8} )

Pero no tuve suerte.

com lo hago?
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 1283
Joined: Fri Feb 10, 2006 02:34 PM
Re: aScan en un array multidimensional...?
Posted: Mon Jul 18, 2016 05:01 PM
Hola,

La asignacion hazla mejor con :=

Esto funciona bien

Code (fw): Select all Collapse
#include 'fivewin.ch'

function main()
    local aLista := array(4), npos

    aLista[1] := { 1, 3, 2}
    aLista[2] := { 7, 3, 2}
    aLista[3] := { 8, 6, 2}
    aLista[4] := {10,3,12}
    
    nPos:= aScan(aLista, { | array | array[1] == 8} )
    ? nPos
retu nil
Salutacions, saludos, regards

"...programar es fácil, hacer programas es difícil..."

UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
HIX -> https://github.com/carles9000/hix
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: aScan en un array multidimensional...?
Posted: Mon Jul 18, 2016 07:52 PM

Gracias!

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

Continue the discussion