On jeudi 18 décembre 2008, Jussi Lahtinen wrote: > Hi! > > I have code like this: > > Dim element as ClassX > > FOR EACH element IN objectarray > IF element = something THEN > objectarray.Remove(objectarray.Find(element)) > ENDIF > NEXT > > This works, but I'm almost sure that there is better way to do this. > Feel kind of dumb to find same element two times... > > > Jussi >
DO iInd = objectarray.Find(element) IF iInd < 0 THEN BREAK objectarray.Remove(iInd) LOOP Or: iInd = 0 WHILE iInd < objectarray.Count IF objectarray[iInd] = element THEN objectarray.Remove(iInd) ELSE INC iInd ENDIF WEND -- Benoit Minisini ------------------------------------------------------------------------------ _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user