Html - Форум «Всё о Паскале»

Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++

Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

Html, как вырезать тэги?

Опции

$ad!st	17.04.2005 3:48 Сообщение #1
Новичок Группа: Пользователи Сообщений: 36 Пол: Мужской Репутация: 0	есть текстовый файл, в нём всякая муть включая ХТМЛ тэги, вот мне надо в другой файл переписать всё кроме тэгов т.е. то что в <> скобках... я незнаю как поставить условие... for i=0 to 99999 do //читаю строки readln(F, S); if S=<> then...(вот как написать что всё кроме <> тэгов зписывать незнаю). -------------------- когда в руках молоток, все кажутся гвоздями

volvo	17.04.2005 3:56 Сообщение #2
Гость	Ну, так тебе надо из строки удалить все, что между "<" и ">", а потом записывать всю строку в другой файл... Делается точно так же, как и в Паскале (хочешь, я тему туда перенесу?) ... Readln(f, s); repeat p_start := Pos('<', s); if p_start > 0 then begin p_end := pos('>', s); delete(s, p_start, p_end - p_start); end; until p_start = 0; writeln(f_2, s); ... Только посмотри внимательнее, я мог где-нибудь с индексами ошибиться... Поздно уже Но алгоритм такой...

$ad!st	17.04.2005 5:05 Сообщение #3
Новичок Группа: Пользователи Сообщений: 36 Пол: Мужской Репутация: 0	спасибо за совет....мне всёравно переносить тему в раздел паскаль или нет....как хочешь -------------------- когда в руках молоток, все кажутся гвоздями

xds	18.04.2005 3:43 Сообщение #4
N337 Группа: Пользователи Сообщений: 737 Пол: Мужской Репутация: 26	Эффективнее так: Код ... var fi, fo: Text; c: Char; t: Boolean; ... t := True; while not Eof(fi) do begin Read(fi, c); if c = '<' then t := False; if t then Write(fo, c); if c = '>' then t := True; end; ... Сообщение отредактировано: xds - 18.04.2005 3:45 -------------------- The idiots are winning.

Altair	18.04.2005 10:17 Сообщение #5
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45	А если в тексте HTML будет нечто подобное? HTML <html> <head> <title> Proga </title> </head> <body> <pre> var a,c:byte; begin if (a>c) or (a<c) then writeln('test'); {!!!!!!!!!!!!!!!!!!!!!!!!!!} end. </pre> </body> </html> То есть символы < и\или > не явл. тегами? -------------------- Помогая друг другу, мы справимся с любыми трудностями! "Не опускать крылья!" (С)

$ad!st	18.04.2005 14:45 Сообщение #6
Новичок Группа: Пользователи Сообщений: 36 Пол: Мужской Репутация: 0	Цитата(volvo @ 16.04.05 23:56) Только посмотри внимательнее, я мог где-нибудь с индексами ошибиться... Поздно уже Но алгоритм такой... ага...ошибся...вт как надо repeat p_start := Pos('<', s); if p_start > 0 then begin p_end := pos('>', s); delete(s, p_start, p_end - p_start+1); end; until p_start = 0; writeln(F2, s); -------------------- когда в руках молоток, все кажутся гвоздями

xds	18.04.2005 19:25 Сообщение #7
N337 Группа: Пользователи Сообщений: 737 Пол: Мужской Репутация: 26	Как известно, в HTML символы "<" и ">" должны быть заменены на "<" и ">" соответственно (даже внутри <pre>). В противном случае HTML-код является ошибочным и его дальнейшая интерпретация основывается на "догадках" браузера. -------------------- The idiots are winning.

« Предыдущая тема · Задачи · Следующая тема »

1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)

Пользователей: 0