Содержится ли строка в списке

Delphi , Компоненты и Классы , Списки

Автор: Сергей
WEB-сайт: http://delphibase.endimus.com

{ **** UBPFD *********** by delphibase.endimus.com ****
>> Функция возвращает true если сторока st содержится в списке строк Stlist

Возвращает true если сторока st содержится в списке строк Stlist

Зависимости: ???
Автор:       Сергей, nfkazak@inbox.ru, Краснодар
Copyright:   VIP BANK
Дата:        11 сентября 2002 г.
***************************************************** }

function ListContained(st: string; StList: TStrings): boolean;
var
  i: longint;
begin
  result := false;
  for i := 0 to StList.Count - 1 do
    if St = StList.Strings[i] then
    begin
      result := true;
      break
    end
end;

Статья Содержится ли строка в списке раздела Компоненты и Классы Списки может быть полезна для разработчиков на delphi & pascal.

Комментарии и вопросы

:: Главная :: Списки ::