Скачать: CL | DM;

Подскажите как работать со словами введенными в 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]

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

---

← →
Юрий Зотов ©   (2003-07-15 11:08) [10]

> Anatoly Podgoretsky © (15.07.03 09:59)

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

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

---

← →
laza admin ©   (2003-07-23 02:11) [11]

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

---

← →
Иван Шихалев ©   (2003-07-23 02:18) [12]

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


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

---

← →
Marser ©   (2003-07-23 02:21) [13]

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

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

---

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

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.018 c