![]() |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
![]()
|
|
| Enchance |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 26 Регистрация: 20.10.2009 Репутация: нет Всего: нет |
Добый день, уважаемые учасники форума!
У меня такой вопрос: есть текст такого типа: <s>ключевое слово1:</s> данные1 <s>ключевое слово2:</s> данные2 Подскажите, пожалуйста, текст программы, который анализирует текст, ищет в нем выражения <s>ключевое слово1:</s> и <s>ключевое слово2:</s>, и присваивает переменной a1 значение 'данные1' , а переменной a2 значение 'данные2'. Возможно ли это вобще? В дельфях шарю на начальном уровне, однако надеюсь, что смогу разобраться в коде. |
|||
|
||||
| Данкинг |
|
|||
![]() Yersinia pestis ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 8302 Регистрация: 7.11.2006 Где: მოსკოვი Репутация: 9 Всего: 130 |
Это как - написать за тебя программу? Тогда в "Центр помощи". -------------------- There's nothing left but silent epitaphs. |
|||
|
||||
| ~FoX~ |
|
||||
![]() НЕ рыжий!!! ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 2819 Регистрация: 8.10.2003 Где: Зеленоград Репутация: 13 Всего: 68 |
Вобще то в ЦП, но я чего то скучаю
Прям не обламался чего то под ночь
Разбирайся....
А если еще поймешь, почему i-4, i+5 и Length(s)-(i+4), то точно сдашь свою лабу Это сообщение отредактировал(а) ~FoX~ - 21.10.2009, 01:52 |
||||
|
|||||
| Enchance |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 26 Регистрация: 20.10.2009 Репутация: нет Всего: нет |
Я извиняюсь за то, что не совсем полно написал вопрос.
Какие дожны быть эти данные1 - неизвестно, известно лишь то, что данные1 - зто текст до конца строки. Пример текста: <HTML> <HEAD> <ТIТLЕ>схема1</ТITLЕ> </HEAD> <BODY> <Н1>заголовок</Н1> <Р> <s>с1:</s> 2 мкф <s>с2:</s> 5 пф <s>r1:</s> 5 кОм <s>r2:</s> 5 кОм <s>r3:</s> 73 кОм </P> </BODY> </HTML> Ключевые выражения для нас - <s>с1:</s> и <s>с2:</s> . Количество ключевых выражений строго определено в самой программе, в данном случае их 2. Функция должна возвращать для переменной а1 текстовое значение '2 мкф' (без кавычек), а для переменной а2 текстовое значение '5 пф'. И не лаба это, а так, чисто для себя. З.Ы. Модераторы, перенесите пожалуйста тему в ЦП. |
|||
|
||||
| ~FoX~ |
|
|||
![]() НЕ рыжий!!! ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 2819 Регистрация: 8.10.2003 Где: Зеленоград Репутация: 13 Всего: 68 |
Enchance, Не понял, а в чем код то мой не верный?
Замени FindStr, на какой нить Edit1.Text, ключевые слова будут то что между <s>:</s> т.е. в твоем случае c1, с2 и т.д. В Res ляжет то что после последнего "> ", 2 мкф, 5 пф и т.д. Или тебе весь хтмл код распарсить надо? Это сообщение отредактировал(а) ~FoX~ - 21.10.2009, 11:34 |
|||
|
||||
| amsoft |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 201 Регистрация: 17.10.2009 Где: KZ, Astana Репутация: 3 Всего: 4 |
Enchance
для приведенного выше кода длина данных не имеет значения, он будет работать правильно, главное, чтобы у тебя не нарушалась структура начальной строки (символом ни больше ни меньше между ПЕРЕМЕННОЙ и ЗНАЧЕНИЕМ). Дооформи приведенный код в вид функции (в качестве параметра передавай имя ПЕРЕМЕННОЙ и НАЧАЛЬНУЮ СТРОКУ, а в качестве результата возвращай ЗНАЧЕНИЕ) и пробегись по всем строкам текстового файла для поиска необходимого ЗНАЧЕНИЯ. Это сообщение отредактировал(а) amsoft - 21.10.2009, 11:51 --------------------
"Кто бы ты ни был - не думай о себе слишком"Дельфин |
|||
|
||||
| Enchance |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 26 Регистрация: 20.10.2009 Репутация: нет Всего: нет |
~FoX~, amsoft,
Все, спасибо за помощь, разобрался. |
|||
|
||||
| Keeper89 |
|
|||
|
Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 2580 Регистрация: 26.2.2009 Репутация: 20 Всего: 58 |
Я бы использовал РВ, ну да ладно, решили и хорошо.
|
|||
|
||||
![]()
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |