on 4/9/03 6:18 pm, MisterX wrote > function FilterLines olist,str > local thisline,nulist > put 1 into thisline > put "" into nulist > repeat while thisline > 0 > set cursor to busy > > put LineOffset(str,olist) into thisline > put line thisline of olist & return after nulist > delete line 1 to thisline of olist > if olist is empty then exit repeat > > end repeat > return nulist > end FilterLines >
wouldn't it be even faster as function FilterLines olist,str filter olist with ("*" & str & "*") return olist end FilterLines ?! Ben Rubinstein | Email: [EMAIL PROTECTED] Cognitive Applications Ltd | Phone: +44 (0)1273-821600 http://www.cogapp.com | Fax : +44 (0)1273-728866 _______________________________________________ metacard mailing list [EMAIL PROTECTED] http://lists.runrev.com/mailman/listinfo/metacard