Filter auf Array ? [erledigt]
Verfasst: Fr, 02. Nov 2018 22:39
hi,
wie hole ich aus einem Array nur die Elemente die einem "Filter" entsprechen
so geht es zwar aber es müsste "noch einfacher" gehen ... wie
wie hole ich aus einem Array nur die Elemente die einem "Filter" entsprechen
Code: Alles auswählen
FUNCTION ArrayFilter(cDLL)
LOCAL aALL := Get_Array()
LOCAL aRet := {}
LOCAL nStart := 1
LOCAL nPosi
DO WHILE .T.
nPosi := ASCAN(aALL,{|x| x[1] = cDLL },nStart)
IF nPosi > 0
AADD(aRet,aALL[nPosi])
nStart := nPosi+1
ELSE
EXIT
ENDIF
ENDDO
RETURN aRet