SEX contributions anyone

[Ben Rubinstein]

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: benr_mc at cogapp.com
  Cognitive Applications Ltd   |  Phone: +44 (0)1273-821600
  http://www.cogapp.com        |  Fax  : +44 (0)1273-728866