Функция StrScan – ищет заданные символы в строке

Функция StrScan в Delphi ищет заданные символы в строке.

Функция StrScan: Пример кода

const
  Numbers = '0123456789';
begin
  if StrScan(Numbers, '2') <> nil
  then ShowMessage('2 - числовая цифра')
  else ShowMessage('2 - не числовая цифра');

  if StrScan(Numbers, 'A') <> nil
  then ShowMessage('A - числовая цифра')
  else ShowMessage('A - не числовая цифра');
end;