|
|
|
Регистрация Восстановить пароль |
|||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
15.11.2007, 10:59
|
#1 |
|
Регистрация: 14.11.2007
Сообщений: 6
|
Повелитель текста!
дан текстовый файл, задача : с 24 по 36 знак найти повторяющиеся строки и заменить их на другой текст.
|
|
|
|
15.11.2007, 11:15
|
#2 |
|
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
В переменку типа string загоняешь этот клочек текста, далее данные из этого стринга разбиваешь в массив используя TStringList.DelimitedText, я так понимаю что разделитель слов является пробел.
Ну и уже в массиве анализируеш на повторение, мона даже поставить сортировку и по ней смотреть повторения
I'm learning to live...
|
|
|
|
|
15.11.2007, 11:25
|
#3 |
|
Регистрация: 14.11.2007
Сообщений: 6
|
Спасибо за совет. Разделителем является символ "|".
Конкрентнее 08.09.2007|21:02:08|KPP|Personal054 |1|Дан доступ||0|276|357|False Здесь мне надо изменить Personal054. Как это сделать в одной сторке я примерно представляю, а как сделать чтобы среди сотни сток искало строки с Personal054 и заменяло их вот это вопрос... Кто подскажет хоть кусочком кода??? |
|
|
|
|
15.11.2007, 11:56
|
#4 |
|
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Прикрепи ка тут тот файлик с данными я попробую оформить идейку...
I'm learning to live...
|
|
|
|
|
15.11.2007, 12:08
|
#5 | |
|
With best regards
Участник клуба
Регистрация: 20.04.2007
Сообщений: 1,448
|
Цитата:
а если до полудня? 9:02:08 - ноль не пишется. (зависит от настроек). Что касается замены - это все делается функциями POS, DELEDE, INSERT.
Life is too short, play more...
Как правильно задавать вопросы |
|
|
|
|
|
15.11.2007, 12:21
|
#6 |
|
Регистрация: 14.11.2007
Сообщений: 6
|
вот файлик, сократил его по максимуму(надеюсь повторения найдутся)
ЗЫ: как видите ноль пишется |
|
|
|
|
15.11.2007, 13:07
|
#7 |
|
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Вот примерчик к твоему
Если что спрашивай
I'm learning to live...
|
|
|
|
|
15.11.2007, 14:29
|
#8 |
|
Форумчанин
Регистрация: 04.03.2007
Сообщений: 615
|
AKstoAK
StringReplace+F1 
|
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| обработка текста | pvleo | Фриланс | 4 | 14.07.2008 05:19 |
| Отображение текста | Hirhufa | Microsoft Office Word | 2 | 27.06.2008 15:42 |
| Чтение текста до ... | Sanek_ntsk | Общие вопросы Delphi | 7 | 23.06.2008 22:17 |
| Обработка текста | Absent | Помощь студентам | 1 | 10.05.2008 19:56 |
| Обработка текста | GAGARIN-NEW | Общие вопросы Delphi | 7 | 06.10.2007 15:25 |
