Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Поиск слова в тексте

shnitken © (2001-12-30 17:15:00)
Добрый HI, Мастера. Поможите плз, расскажите, как можно зделать поиск слова в тексте.

Вадим (2001-12-31 15:25:00) [1]
const
s = "это строка";

Pos("о", s) = 3

Anatoly Podgoretsky (2001-12-31 11:10:00) [2]
Серьезно искать!, пока проблема, что бы вообще что нибудь найти с помощью простейших функций

MrBeer (2001-12-31 04:06:00) [3]
Ja ne znaju kak tam Pos sdelan, no hochu zametitj chto esli nado serjozno iskatj, estj smisl naiti algoritmi skazhem Turbo Boyer-Moore ili Apostolico-Giancarlo.
Po etoi teme estj horoshii sait (pravdo primeri na C):
http://www-igm.univ-mlv.fr/~lecroq/string/index.html

Best regards

Oleg Gashev (2001-12-30 23:00:00) [4]
StrPos Example

uses SysUtils;
const

S: PChar = "Ready, Set, Go! ";
SubStr: PChar = "Set";

var

P: PChar;
begin
P := StrPos(S, SubStr);
if P = nil then
Canvas.TextOut(10, 10, "Substring not found")
else
Canvas.TextOut(10, 10, "Substring found at index " + IntToStr(P - S));
end ;

(C) Delphi Help

Anatoly Podgoretsky (2001-12-30 18:31:00) [5]
Ты хелп смотрел, какая часть не понятна?
Кидать пример из хелпа будет верхом неуважения к другим.
Вот если подтвердишь, что у тебя нет зелпа, тогда другое дело, но в этом случае стоит задуматься над его установкой, а то кидать сюда порядка 100 мегабайт будет несколько затруднительно.

shnitken (2001-12-30 18:09:00) [6]
Ежели не в тягость кусочек кода, плз

Anatoly Podgoretsky (2001-12-30 17:41:00) [7]
Ну например функцией POS

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »