I used to have a wee common function alled StringIndex for this, that I'd 
do things like:

  case StringIndex(MyString, ['Fred', 'Jim', 'Wally', 'Elephants']) od
    0: // hi fred
  end;

The StringIndex function just creates a temp TStringList and does what 
Stephens example does...

--On Thursday, June 07, 2001 11:29 PM +1200 Stephen Barker 
<[EMAIL PROTECTED]> wrote:

>   sl.CommaText := 'Fred,Jim,Wally,Elephants';
>   case sl.IndexOf(MyString) of



---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"

Reply via email to