Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Маша сильно болеет туберкулезом.


Страницы:   1 2 3 4

Антон К. ©   (2002-09-19 20:02:00) 

Вопрос такой.
Есть к примеру строка: Маша сильно болеет туберкулезом.
Нужно из этой строки вытащить все слова и вставить их в listbox этаким списком. Т.е в listbox выглядеть это должно так:

Маша
сильно
болеет
туберкулезом.

Как такое сделать, а? И очень желателен исходник!

Еще вопрос. Почему pos(), реагирует на Регистр и возможно ли это как то изменить. К примеру код

i:=pos("маша","Маша сильно болеет туберкулезом.") не найдет ничего, т.е i будет равно 0, а вот
i:=pos("Маша","Маша сильно болеет туберкулезом.") укажит цифру 1, т.е в принципе найдет искомое слово Маша. Видимо это функция запрограмированна на учет регистра, тогда как же узнать, что определенное слово есть в строке без учета регистра? Какая есть альтернатива Pos?


Антон К.   (2002-09-20 18:14:00) [21]

нуууу, спасибо всем, но я уже нашел (часов 35 назад). :)


REA   (2002-09-20 16:30:00) [22]

Да чтоб она уже сдохла, эта Маша.


Zemal   (2002-09-20 16:16:00) [23]

KSergey >> Не помню где я брал второй сервпак, но после накатки Делфи писал в About: Delphi 5.2 Servise pack 2.
qube >> Я не говорил что своё придумывать плохо, но своё надо придумывать с использованием уже имеющихся разработок! Что?! Зря что ли программеры Борланда трудились создавая классы?! Я имел ввиду, что не стоит трудиться и создавать своё, если аналог уже существует. К примеру и 2+2 ты можешь, не используюя стандартное сложение, побитово складывать... это будет просто смешно :). Так почему бы не использовать, то что разработано? Надо здраво рассуждать и искать пути решения... в общем-то большинство проблем возникающих перед нами уже решены, а мы зачастую, пытаемся программистским трудом их повторить просто не зная о них. К примеру, разве тяжело догадаться, что все операции по разбиению строк, их конкатенации и т.д. уже разложены по полочкам и есть методы, процедуры и функции, которые работают... и правильно работают. Почему бы не подумать и не поискать?! Так нет, нафиг нам искать, луче будем циклом и вручную городить и терять больше времени на вылавливание ошибок и баг, чем на поиск в хелпаках. Вот я чего имел ввиду, а не про придумывание. Я имел ввиду, что программист, столкнувшись с задачей, должен чутьём чувствовать, что есть уже подобное, надо найти и использовать, а не городить заново. Не использовать существующее также смешно, как есть спагетти ложкой :).


qube   (2002-09-20 15:49:00) [24]

2 Zemal
"Если тебе проще придумать свое, чем найти готовое, то ты остановился в развитии" -- это ты, старина, загнул :)). Свое придумывать необходимо (!) для развития, хотя велосипеды изобретать не стоит. Ты посмотри на половину вопросов этого форума: а есть ли компонент, чтобы 2+2 сложить? Уж лучше остановиться в развитии, по-моему...


KSergey   (2002-09-20 15:41:00) [25]

>Zemal © (20.09.02 14:40)

2-й сервис пак для D5?!!!!! А борланд о нем в курсе?!
Есть подозрение, что вам все же стоит отойти от философствования и посмотреть на мир вокруг... ;)
Если же он у вас есть - можно уточнить где вы его взяли?


pasha_golub   (2002-09-20 15:36:00) [26]


> Zemal

Согласен, основы надо знать. Но для одной строки классы создавать - это, извините, слишком. Ко всему прочему основы то как раз и кроются в старом процедурном методе, без него трудно будет что-то строить, ибо он есть очень крепкий фундамент.
За грамматику не сердись, уж больно ты категорично все заявлял, а я категоричности не люблю. :-))


Zemal   (2002-09-20 15:00:00) [27]

Ой... действительно у меня первый сервпак... второй дома... удивляюсь как этот тут ещё завалялся :)... щас я его грохну :). Сходи на сайт Борланда и посмотри, там должен быть, там полно всякого :).


Vdovin-AV@yandex.ru   (2002-09-20 14:54:00) [28]

если это D5EntUpdate.exe то это у меня есть и уже установлено.


Zemal   (2002-09-20 14:54:00) [29]

Вообще зачем он нужен? Установи лучше Делфи 6 и два сервпака... конечно если машина позволяет (говорят слабенькие процы плохо справляются). В Делфи 6, конечно, тоже не всё гладко... например вчера такую багу нашол: оказывается событие Application.OnMinimize срабатывает только один раз, а потом что-то происходит и приложение вообще не реагирует на кнопку минимизации(в заголовке окна), но на Application.Minimize из програмного кода реагирует нормально и сворачивается. Вот такая вот бага. Попробую в Support достучаться и сообщить. :) Почему так происходит совершенно непонятно. В Делфи 5 такого небыло.


Zemal   (2002-09-20 14:40:00) [30]

Могу выслать. Он однако большой. 28 мегов.


Separator   (2002-09-20 14:31:00) [31]

В магазинах, на базарах


Vdovin-AV@yandex.ru   (2002-09-20 14:29:00) [32]

Для Zemal:
Один сервопак я ставил и у меня этих методов нет,
но где взять второй для пятерки может подскажешь...


Zemal   (2002-09-20 14:10:00) [33]

Ну правописание у меня храмает :(. Признаюсь. Но не надо путать зелёное с кислым, эти понятия находятся в разных плоскостях. А с правописанием у меня со школы... привили, понимаете ли ненависть к Рус.яз и Лит-ре...
На счёт Делфи 5 и TStringList могу сказать только одно - я делал и у меня работало. Кстати, может проблема в том, что ты сервпаки не установил для 5 Делфи. Утверждать не буду, но похоже в сервпаках дополнения к классам и вышли. Я сам пользуюсь 6 Делфи уже давно, но у меня есть книга Архангельского "Делфи 5" в которой класс TStringList и все его методы описаны в подробностях... может автор и опередил время, но... я точно помню, что использовал DelimitedText... но видимо у меня оба сервпака были установлены (я за этим слежу, люблю обновления больше чем релизы) :).


Behemoth   (2002-09-20 13:47:00) [34]

to Zemal: да ты философ?!!!


Андрей Прокофьев   (2002-09-20 13:39:00) [35]

2 pasha_golub © (20.09.02 13:37)
>> Базовые знания языка тоже нужно знать!!!

:)))


AndreyAdm   (2002-09-20 13:37:00) [36]

пиши на мыло. есть исходник, работает на "ура".
Разбтвает строку на слова и обратно


pasha_golub   (2002-09-20 13:37:00) [37]


> Zemal

Не НАШОЛ! А НАШЕЛ! Базовые знания языка тоже нужно знать!!!


Vdovin-AV@yandex.ru   (2002-09-20 13:35:00) [38]

Незнаю, незнаю...
TStrings.Delimiter и TStrings.DelimitedText в Delphi 5
не существует.
Classes.pas выслать ?
Запусти Delphi 5 и да поможет тебе F1. А уже потом можно философствовать.......


Zemal   (2002-09-20 13:17:00) [39]

Vdovin-AV@yandex.ru >> Ты не прав! В Делфи 5 уже были все методы класса TStringList реализованы! И все работали в 5 делфе! Вот-с...

Кот Бегемот >> Классический пример с классом TStringList... так это самые азы!!! Если уж азы забыть, т.е. базовые знания, то лучше больше за Делфи и не браться... Такие вещи каждый начинающий программист должен знать на зубок. Можно забыть что-то из RX или другие сторонние разработки, но ведь TStringList это СТАНДАРТ!!! А потраченное время на поиски возвращается сторицей, один раз нашол и запомнил надолго. Всё что ты нашол - откладывается у тебя в голове и библиотеке твоих исходников. А если тебе проще придумать, чем найти верное решение, то ты остановился в развитии, ибо ничего уже не ищешь и следовательно ничему новому, в принципе, не научишься. Вот так можно остановиться в развитии, как в общем-то многие и сделали. А остановиться в развитии - значит отстать от новых технологий... ладно, не буду дальше продолжать и так всё понятно.
Мысль программиста не должна быть узкой и оперировать только известными методами, она должна предпологать, искать, подниматься на самые высокие уровни и опускаться до самых низов, с лёгкостью оперировать не до конца известными параметрами, или вообще совершенно неизвестными, искать ниточки за которые можно уцепиться и раскрутить весь клубок, абстрагироваться от сложного к простому и наоборот... и главное - не пугаться неизвестного и не бежать от него в панике, уметь двигаться к цели правильным а не самым лёгким путём... только тогда программист достигает мастерства, а не ползает по своей делянке, которую знает как свои пять пальцев.
Вот моё мнение о том, какое мышление должно быть у программиста для достижения успеха в наше нелёгкое время, наполненное океаном новых технологий, один вид которых некоторых пугает, а некоторых только подстёгивает. Вы можете высказаться против здесь, в форуме, но в глубине души будете понимать, что я прав. Удачи всем.


Кот Бегемот   (2002-09-20 12:39:00) [40]

Урааа :)
Меня первый раз удалилиии :)))

Zemal © (20.09.02 12:24)
Так ты модер ???
Да я и не дуюсь :) - даже наоборот
А еще бывает такое, что ПРИ НЕХВАТКЕ БАЗОВЫХ ЗНАНИЙ проще придумать свое чем тратить время на поиски
Классический присмер TStringList


Страницы:   1 2 3 4

Наверх

Титульная страница Поиск, карта сайта Написать письмо