Показать сообщение отдельно
  #6  
Старый 01.10.2015, 08:16
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

так функция IsIn это и делает по сути. только индекс нужно возвращать i. ну и нижнюю границу не 0 брать, а Low для чистоты кода.
__________________
Пишу программы за еду.
__________________