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: Norman Palardy <npalardy@great-white-software.com>
Date: Sat, 31 Jan 2009 16:22:28 -0700
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 31-Jan-09, at 12:10 PM, 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.

just go down to 1 not 0

_______________________________________________
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>