I created a class for searching an array. My find method iterates through the array.

  dim i, max as integer

  max = ubound(objsource)


  for i = 0 to max
    if search(objsource(i)) then
      objdest.append objsource(i)
    end if
  next


I created an event "SEARCH" that compares a casted object's property against a term that I want to search for:

  if adrrecord(obj1).character = self.stringtofind then
    return true
  else
    return false
  end if


My program crashes on the second successful search, when the objsource(i) gets appended to the objdest.array. Does anyone have any insight into this crash??
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to