Подскажите как работать со словами введенными в edit

← →
laza admin © (2003-07-14 20:15) [0]

мне нужно вывести 2 и 3-е слово из едита
я знаю только как работать с символами например edit1.text[2] а вот со словами? Заранее благодарен!

← →
Skier © (2003-07-14 20:23) [1]

см. ф-цию Pos(...)

← →
Igit © (2003-07-14 22:31) [2]

Вот пример состряпал:
procedure TForm1.Button1Click(Sender: TObject); var tmp, s:String; p:Integer; begin tmp:=edit1.text; while True do begin p:=pos(" ",tmp); if p<>0 then begin listbox1.Items.Add(s+Copy(tmp,1,p-1)); delete(tmp,1,p); end else begin tmp:=s+tmp; listbox1.Items.Add(tmp); Break; end; end; end;

здесь нет проверки на более одного пробела между словами.
строка из Edit1, слова пишутся в ListBox1.

← →
laza admin © (2003-07-15 00:41) [3]

а может кто еще поможет со скриптом чтоб
допустим если 1 слово Я
2- ХОЧУ
3- СПАТЬ
он делал что нибудь
listbox1.items.add("иди спать");
короче пишу прогу для создания простенького чата с компом...
совсем дельфи забыл.

← →
Marser © (2003-07-15 00:52) [4]

У-у братец, может тебе ещё и AI разработать? :-)
Делай просто - если "хочу спать" то "иди спать".

← →
nick-from © (2003-07-15 02:24) [5]

> Подскажите как работать со словами введенными в edit

go2 орешник ;)

← →
k-man © (2003-07-15 09:57) [6]

laza admin © (15.07.03 00:41)
Я валялся :)
От себя добавлю: Если "я хочу в туалет" то писать "Иди в туалет" :)
Класс! Он уже две фразы знает. Кто еще добавит? =)

← →
Anatoly Podgoretsky © (2003-07-15 09:59) [7]

Подход неверный изначально, ну не учить же программу разным местам, куда он хочет пойти, надо подойти с другой стороны,

Если "Я хочу ....", то "Иди ты ....", насколько сразу умнее станет.

← →
Skier © (2003-07-15 10:07) [8]

>laza admin © (15.07.03 00:41)
"Welcome to the real world" (С) Matrix

← →
k-man © (2003-07-15 10:26) [9]

> "Иди ты ....", насколько сразу умнее станет.
Кстати если к этой фраз добавить известное продолжение, то фраза станет универсальной и можно будет отвечать ей на каждый вопрос.

> Anatoly Podgoretsky © (15.07.03 09:59)

Это и есть истинно системный подход.

Можно развить - "иди ты..." независимо ни от чего. И вот уже
готов искусственный интеллект. Не хуже всяких там "терминаторов".

мда ...
а ни одной полезной информации...
аи я и сам разработаю...
мне только нужен пример работы со словами....

> аи я и сам разработаю...
> мне только нужен пример работы со словами....

Цитата дня, однако.

> Цитата дня, однако.

Да уж... Я выпал :-))

Подскажите как работать со словами введенными в edit Найти похожие ветки