Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>

    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Сохранение странички в файл из TWebBrowser
   Категория: Интернет и Сети
  Создание цветных строк в ListBox
   Категория: Компоненты
  Как получить дату создания файла
   Категория: Файловая система
  Компоненты Panel, GroupBox, Bevel, ScrollBox, Splitter
   Категория: Компоненты
  Как нарисовать календарь
   Категория: Текст и строки
  Вставить иконки в Grid
   Категория: Компоненты
  Число четное или нечетное
   Категория: Математика
  Показать удаленные записи в DBase
   Категория: Базы данных
  Cколько файлов есть в определённой папке
   Категория: Файловая система

Delphi - Справочник: StrScan

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 StrScan
function StrScan ( const Characters : PAnsiChar; SearchChar : Char ) : PAnsiChar;
Функция (Unit SysUtils)
Ищет заданные символы в строке
Описание:
StrScan используется в тех случаях, когда вам нужно найти единичный символ в списке известных символов (Characters).

Если SearchChar (искомый символ) присутствует в Characters, то в качестве результата функции возвращается указатель на Characters.

Если символ отсутствует, то возвращается nil.
Пример кода: Простой пример

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;

Результат:
2 - числовая цифра
A - не числовая цифра

  << Вернуться