realbasic-nug
[Top] [All Lists]

Re: Removing Duplicates in an Array

To: REALbasic NUG <realbasic-nug@lists.realsoftware.com>
Subject: Re: Removing Duplicates in an Array
From: "Eric M. Williams" <eric@oxalyn.com>
Date: Sat, 31 Jan 2009 11:49:47 -0800
Authentication-results: mx.google.com; spf=neutral (google.com: 74.124.194.228 is neither permitted nor denied by best guess record for domain of realbasic-nug-bounces@lists.realsoftware.com) smtp.mail=realbasic-nug-bounces@lists.realsoftware.com
Delivered-to: listarchive@realsoftware.com
In-reply-to: <4984A232.70802@stny.rr.com>
References: <4984A232.70802@stny.rr.com>
Reply-to: REALbasic NUG <realbasic-nug@lists.realsoftware.com>
Sender: realbasic-nug-bounces@lists.realsoftware.com

On Jan 31, 2009, at 11:10 AM, Tom Russell wrote:

I am trying to remove duplicates in an array but not sure how to handle once I get down to below 0. TheDocs is an array of strings.

My code:

dim i as Integer
TheDocs.Sort
for i = UBound(TheDocs) downto 0
  if TheDocs(i) = TheDocs(i-1)  then
    TheDocs.Remove i
  end if
Next

Once i gets to 0 then it will throw an out of bounds exception and this is where I am not sure how to handle this.

It would be faster (probably) to push them all into a dictionary, which will automatically remove duplicate Keys.

Eric M. Williams
Oxalyn Software

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>


<Prev in Thread] Current Thread [Next in Thread>