Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];

Вниз

Поиск слова в тексте   Найти похожие ветки 

 
shnitken   (2001-12-30 17:15) [0]

Добрый HI, Мастера. Поможите плз, расскажите, как можно зделать поиск слова в тексте.


 
Anatoly Podgoretsky   (2001-12-30 17:41) [1]

Ну например функцией POS


 
shnitken   (2001-12-30 18:09) [2]

Ежели не в тягость кусочек кода, плз


 
Anatoly Podgoretsky   (2001-12-30 18:31) [3]

Ты хелп смотрел, какая часть не понятна?
Кидать пример из хелпа будет верхом неуважения к другим.
Вот если подтвердишь, что у тебя нет зелпа, тогда другое дело, но в этом случае стоит задуматься над его установкой, а то кидать сюда порядка 100 мегабайт будет несколько затруднительно.


 
Oleg Gashev   (2001-12-30 23: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


 
MrBeer   (2001-12-31 04:06) [5]

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


 
Anatoly Podgoretsky   (2001-12-31 11:10) [6]

Серьезно искать!, пока проблема, что бы вообще что нибудь найти с помощью простейших функций


 
Вадим   (2001-12-31 15:25) [7]

const
s = "это строка";

Pos("о", s) = 3



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.004 c
1-52533
Aleksandr
2001-12-27 16:25
2002.01.17
Никак со сплиттером не управиться!


3-52520
der
2001-12-14 06:49
2002.01.17
Формирование меню из DLL


4-52680
Art
2001-11-16 15:13
2002.01.17
А как добавить свой пункт в меню свойства файла или отправить???


1-52601
shnitken
2001-12-30 09:57
2002.01.17
Label1.Font.Color


3-52522
Oleg_K
2001-12-14 10:05
2002.01.17
DataSet not in edit or insert mode





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский