Thanks for all your ideas and replies.
I managaged to do the trick using the code:
StringList.Objects[ I] := TObject(Succ( Integer(StringLi st.Objects[ I])));
regards
________________________________
Slide scanning / dia's scannen
vanaf / from
E0,08c
www.scancare.nl
________________________________
________________________________
From: emmanuellamy <[email protected]>
To: [email protected]
Sent: Wed, October 7, 2009 4:42:06 AM
Subject: [delphi-en] Re: counting occurances of unique words
I have accomplished something similar using a TClientDataset with 2 fields on
it: Words & CountOfWord. I copied the TStrings.Text of my container into a
string variable and iterated through it looking for blank spaces. The first
occurence of "blank space" I copied the string to another string variable,
retrieve the word and save it into my TClientDataset, creating a new row for
new word and counting CountOfWord + 1 for existing words. Deleting the words
found from the string image contained in the second string variable. That
worked fine for me! HTH.
Emmanuel
--- In delphi...@yahoogrou ps.com, Andries Bos <andriesbos@ ...> wrote:
>
> Hello
>
> a simple question, but I can't remember the answer.
>
> I'm scrolling through a list of strings one by one (e.g. all words in a rich
> edit) and I want to count how much unique words I have and how often these
> words have been used.
>
> any ideas?
>
> regards, Andries
>
>
>
> ____________ _________ _________ __
>
> Slide scanning / dia's scannen
> vanaf / from
> E0,08c
> www.scancare. nl
>
> ____________ _________ _________ __
>
>
>
>
> [Non-text portions of this message have been removed]
>
[Non-text portions of this message have been removed]
