Справочник функций и процедур Delphi: AnsiPos

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

AnsiPos
Функция
Находит позицию одной строки в другой SysUtils unit
  function AnsiPos ( const Needle, HayStack : string ) : Integer;


Описание
Функция AnsiPos ищет подстроку Needle в строке HayStack, возвращая позицию в строке первого вхождения.

Весь Ansi команды поддерживают многобайтовые символы и символы с диакритическим знаком.

Если строка не найдена, то возвращается 0.

Поиск чувствителен к регистру.
Примечания
Обратите внимание, что строки начинаются с позиции равной 1.

Многобайтовые наборы символов, определенные операционной системой. Например, Восточные версии Windows используют многобайтовые символы для поддержания их очень большого набора символов.
Похожие команды
AnsiIndexStr  Сравнивает строку со списком строк, возвращает соответствующий индекс

AnsiMatchStr  Возвращается истина, если строка точно соответствует какой-либо строке из списка

LastDelimiter  Находит последнюю позицию указанных символов в строке

StrScan  Ищет заданные символы в строке

 
Пример кода : Нахождение слова в предложении
var
  position : Integer;

begin
  // Поиск слово 'Cat' в предложении
  // Обратите внимание: что этот поиск чувствителен к регистру, так, что
  //                    первое 'cat' не рассматривается
  position := AnsiPos('Cat', 'The cat sat on the Cat mat');
  if position = 0
  then ShowMessage('''Cat'' не найдено в предложении')
  else ShowMessage('''Cat'' было найдено начиная с символа '+IntToStr(position));
end;
'Cat' было найдено начиная с символа 20
 


Последние добавленные на сайт исходники

3D Designer

Sik Screen Capture

Patch Maker

Айболит (remote control)

ListBox Drag & Drop

Доска для игры Реверси

 

Графические эффекты

Рисование по маске

Перетаскивание изображений

Canvas Drawing

Рисование Луны

Поворот изображения

 

Copyright © 2004-2021 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте   Facebook   Ссылка на Twitter   Ссылка на Telegram