Определить фразу в Edit!

← →
Большой Гого (2005-09-12 22:21) [0]

Привет, ребята! У меня такой вот вопрос есть.Как можно определить, что в поле Edit введена фраза из трёх-четырёх слов? Интересная тема, да?

← →
Adder © (2005-09-12 22:23) [1]

нет, не интересная :Р

← →
Большой Гого (2005-09-12 22:25) [2]

Добрый вечер! Ну может и не интересная но всё же! В компонент Edit1 введён некий текст, как можно выяснить, что там фраза из трёх слов. Предложение через пробел?

← →
Ihor Osov'yak © (2005-09-12 22:27) [3]

> Предложение через пробел?

Да, если критерием разбития на слова есть исключительно пробел.

← →
Qween (2005-09-12 22:40) [4]

А как это ещё можно сделать?

← →
Ihor Osov'yak © (2005-09-12 23:00) [5]

сделайте поиск вокруг комбинации слов "парсинг строк" можно еще додать слово delphi

← →
Джо © (2005-09-12 23:02) [6]

Посчитать кол-во пробелов в строке. Пропуская двойные, если нужно. Интересно, да?

← →
Adder © (2005-09-12 23:04) [7]

> Джо © (12.09.05 23:02) [6]

И не забыть про Tab -)

← →
Джо © (2005-09-12 23:11) [8]

> [7] Adder © (12.09.05 23:04)

Еще не считать начальные/конечные пробелы. Отсечь их сразу Trim"ом да не мучаться :)

← →
Adder © (2005-09-12 23:12) [9]

> Джо © (12.09.05 23:11) [8]

Интересно, да? -)))

← →
Джо © (2005-09-12 23:15) [10]

> [9] Adder © (12.09.05 23:12)

Угу :-))) Я весь просто загорелся этой идеей. Всю ночь, наверное, размышлять буду, а к утру застрелюсь из-за неразрешимости...

← →
jack128 © (2005-09-12 23:17) [11]

Ihor Osov"yak © (12.09.05 22:27) [3]
Да, если критерием разбития на слова есть исключительно пробел.
Qween (12.09.05 22:40) [4]
А как это ещё можно сделать?

"Ну...Так,например" ;)

← →
Prohodil Mimo © (2005-09-12 23:18) [12]

Джо © (12.09.05 23:15) [10]
застрелюсь из-за неразрешимости...

pogodi streljat"sja... eto tol"ko nachalo uchebnogo goda :o)

← →
Prohodil Mimo © (2005-09-12 23:24) [13]

A ja znaju kak podschitat" kol-vo simvolov v vvedjonnoj stroke:
nuzhno vzjat" kinut" na formu TMemo, zdat" jemu shirinu = 3, a daleje

memo1.text:=Predlozhenije;
label1.caption:=inttostr(memo1.lines.count);
:o)

zhelatel"no sdelat" memo1.visible:=false;
chto bi nikto ne dogadalsja o nashem hitrom sposobe.

A vot opredeljat" kol-vo slov s pomosh"ju memo ja poka ne nauchilsja :o)

← →
Ученик чародея © (2005-09-12 23:28) [14]

const razdel_in:set of char =[ #0,";"," ",",",#13,#10,"+","-",":",".","!","?"]; function CalcWords(s:Pchar):longword;stdcall; var c:char;slen:integer;i:integer;counter:integer; begin slen:=length(s);i:=0;counter:=0; {проход до конца строки} while i<=slen do begin {поиск разделителей и пропуск до неразделителя} c:=s[i]; while (i<=slen) and (c in razdel_in) do begin inc(i); if i<=slen then c:=s[i]; end; {если не разделитель, то в список слов добавляем 1} if (not(c in razdel_in)) and (i<=slen) then inc(counter); {пропуск всех символов в слове до разделителя} while (i<=slen) and (not(c in razdel_in)) do begin inc(i); if i<=slen then c:=s[i]; end; end; {вывод количества слов} CalcWords:=counter; end;

← →
Ученик чародея © (2005-09-12 23:30) [15]

За код не пинать бо древний

← →
Джо © (2005-09-12 23:35) [16]

> [14] Ученик чародея © (12.09.05 23:28)

Я протестую против того, что "Миклухо-Маклай" - это 2 слова! 8-|

← →
Ученик чародея © (2005-09-13 00:04) [17]

>>Джо © (12.09.05 23:35) [16]

Напишите свой, хоть с учетом семантической составляющей текста.

← →
kaif © (2005-09-13 01:29) [18]

Сколько слов во фразе "а ну его на ..."?

2 Adder © (12.09.05 22:23) [1]

>нет, не интересная :Р

Способ ответа позаимствован у Жучки? :)

Кстати мы часто так в семье и общаемся. Проецируем реакцию собак на нашу действительность. :)
Интересно получается!
Но :Р - только тогда, когда кто-то чужой приходит (или пытается прийти) к нам!

> [16] Джо © (12.09.05 23:35)
>
> > [14] Ученик чародея © (12.09.05 23:28)
>
> Я протестую против того, что "Миклухо-Маклай" - это 2 слова!
> 8-|

Это уже проблемы самого Миклухо-Маклая.... :-)

> pogodi streljat"sja... eto tol"ko nachalo uchebnogo goda
> :o)

Предлагаю наряду с конференцией "Начинающим" создать конференцию "Студентам-двоечникам" и переносить туда соттветствующие топики. :-)

> Предлагаю наряду с конференцией "Начинающим" создать конференцию
> "Студентам-двоечникам" и переносить туда соттветствующие топики. :-)

или создать раздел "потенциальный орешник"

> SergP © (13.09.05 02:18) [21]
> Предлагаю наряду с конференцией "Начинающим" создать конференцию
> "Студентам-двоечникам" и переносить туда соттветствующие
> топики. :-)

ага с двумя плюсиками :))

"cjhgvd dgbgbv gbgjlkjngkd" - это фраза?

Определить фразу в Edit! Найти похожие ветки