_Cazalan

я тольо это нашёл
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;

Gruvi

а разве счётчик For не нужен ? как ты будешь осуществлять так называемое хождение ?

_Cazalan

я с AnsiPos первый раз работаю. ничего о ней не знаю.

_Cazalan

тот код ищет в предложении слово кет и пишет сколько нашёл их. мне надо из большого текста удалить от предложения до предложения. как это осуществить?
на одном сайте сказали что AnsiPos надо использовать

Gruvi

Вот тебе справочник по делфи.
- " Delphi"