Функции и процедуры Delphi. Справочник.

II. ФУНКЦИИ И ПРОЦЕДУРЫ ДЛЯ РАБОТЫ СО СТРОКАМИ

2. Функции и процедуры для работы с длинными строками

Функция StrPos( Substr, S: PChar ): PChar;

Модуль: SysUtils

Описание
Функция возвращает указатель на первое местоположение подстроки Substr в длинной строке S. Если S не содержит подстроку Substr, то функция возвращает nil.

Пример
const
   SubStr: PChar = 'www';
var
   S, R: PChar;
begin
   S:= 'http://www.site.ru/delphi/';
   R:= StrPos(S, SubStr);
   if R<>nil then MessageDlg( R, mtInformation, [mbOk], 0) else
       MessageDlg( 'Не правильно указан URL!', mtError, [mbOk], 0);
end;

[Вернуться к содержанию]