Use a string value in a case statement

uses
  StrUtils;

[...]

Case IndexStr('somename', ['bobby', 'tommy', 'somename', 'george']) of
  0: ..code..;                   // bobby
  1: ..code..;                   // tommy
  2: ..code..;                   // somename
 -1: ShowMessage('Not Present'); // not present in array
else
  ShowMessage('Default Option'); // present, but not handled above
end;

[...]