TStringList.Find

function Find(S: String; var Index: Integer): Boolean

Description

Find returns True if the string S is present in the list. Upon exit, the Index parameter will contain the position of the string in the list. If the string is not found, the function will return False and Index will contain the position where the string will be inserted if it is added to the list.
Note: this function is supposed to be used with sorted lists.

Example

var
  s: TStringList;
  i: integer;

begin
  s := File.CreateStringList();
  s.Append('a'); // index 0
  s.Append('b'); // index 1
  s.Append('d'); // index 2
  s.Sort();
  s.Sorted := TRUE;

  s.Find('b',i); 
  // i = 1

  s.Find('c',i);
  // i = 2

  if s.Add('c') = i then
    WriteLn('Indeed added at index '+inttostr(i))
  else
    WriteLn('Oops there''s a bug!');

  s.Free;
end.