Форум: "Потрепаться";
Текущий архив: 2003.08.07;
Скачать: [xml.tar.bz2];
Вниз
Подскажите как работать со словами введенными в 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 вся ветка
Форум: "Потрепаться";
Текущий архив: 2003.08.07;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.01 c
