|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
30.07.2019, 17:01 | #1 |
Форумчанин
Регистрация: 23.11.2016
Сообщений: 100
|
удалить дубликаты повторяющие слова из memo
всем драсти как можно удалить повторяющие слова из memo? ношел вот такой кодик
Код:
|
30.07.2019, 17:14 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
И Вам здравствовать!
Каждое слово на отдельной строке? Слова с разным регистром букв так, Так, ТАК, тАк, ТаК - это всё разные слова? так не надо использовать ВИЗУАЛЬНЫЙ компонент Memo вместо него - используйте TStringList |
30.07.2019, 17:42 | #3 |
Форумчанин
Регистрация: 23.11.2016
Сообщений: 100
|
да слова с разным регистром а как использовать TStringList ? может поделишься кодом?
|
30.07.2019, 21:40 | #4 |
Участник клуба Подтвердите свой е-майл
Регистрация: 26.01.2008
Сообщений: 1,897
|
Без учёта регистра
Код:
|
30.07.2019, 21:58 | #5 |
Форумчанин
Регистрация: 23.11.2016
Сообщений: 100
|
добавил 30 000 строк в мемо программа серавно не отвечает
|
31.07.2019, 01:56 | #6 | |
ПШП
Участник клуба
Регистрация: 15.07.2013
Сообщений: 1,872
|
Цитата:
Код:
Код Shouldercannon при всего-то 30 000 строк должен выполняться за такое время, что вы и глазом моргнуть не успеете. Ну правда уважаемый Shouldercannon не вставил в свой код возврат результата в Мемо |
|
31.07.2019, 02:18 | #7 |
Форумчанин
Регистрация: 23.11.2016
Сообщений: 100
|
ставил проверил программа вроде не тормозит а думает и удаляет повторы очень долго и в место ShowMessage(SL.Text); ставил так memo2.lines.add(SL.Text);
|
31.07.2019, 02:32 | #8 |
ПШП
Участник клуба
Регистрация: 15.07.2013
Сообщений: 1,872
|
|
31.07.2019, 02:35 | #9 |
Форумчанин
Регистрация: 23.11.2016
Сообщений: 100
|
ну так ставил и твой вот пример из 30 000 строк бывает 1000 дубликат или 5000 пытаясь удалить эти дубликаты программа думает так долго
Последний раз редактировалось falsebegin; 31.07.2019 в 02:38. |
31.07.2019, 02:56 | #10 |
ПШП
Участник клуба
Регистрация: 15.07.2013
Сообщений: 1,872
|
Чушь!
Приведите код проекта. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Удалить дубликаты и посчитать их сумму | Pluselectro | Microsoft Office Excel | 4 | 10.02.2017 17:02 |
.Net 3 Как удалить дубликаты строки? | CloudStrife | C# (си шарп) | 6 | 26.12.2015 13:42 |
Удалить из memo текст начиная от начального слова ,до конечного | snakes | Общие вопросы Delphi | 5 | 02.11.2013 18:46 |
Удалить дубликаты строк | Tronix | Общие вопросы Delphi | 24 | 07.10.2013 06:49 |
удалить дубликаты в stringlist | yuran111 | Общие вопросы Delphi | 3 | 29.04.2011 18:24 |