30. juni 2002 - 15:44
Der er
6 kommentarer og 1 løsning
Fjern HTML-koder
Jeg har en streng med sourcen fra en hjemmeside - men jeg skal have fjernet alle HTML-koder, så der kun er den rene tekst tilbage... Jeg har selv forsøgt, uden held
Annonceindlæg tema
Forsvar & beredskab
Cybersikkerhed, realtidsdata og robuste it-systemer er blevet fundamentet for moderne forsvar.
Prøv med StringReplace(S,'<HTML>','',[rfReplaceAll, rfIgnoreCase]); StringReplace(S,'</HTML>','',[rfReplaceAll, rfIgnoreCase]); osv...
også lige helt rigtigt S := StringReplace(S,'<HTML>','',[rfReplaceAll, rfIgnoreCase]); S := StringReplace(S,'</HTML>','',[rfReplaceAll, rfIgnoreCase]);
kan man ikke lave noget med at den finder nærmeste '<' og '>' og sletter dem, inkl det der er imellem og kører det i et loop?
Jo da, du kan bruge pos, find den første '<' og husk positionen find den første '>' check at pos'en er større end den anden. Noget ala dette : Idx := Pos('<',S); Delete(S,Idx,Pos('>',S)-Idx);
while pos('<',TmpStr) > 0 do begin delete(TmpStr,pos('<',TmpStr),pos('>',TmpStr)-pos('<',TmpStr)); end; den kører i et uendelig loop... Hvorfor?
Aha.. der skulle lige et '+1' ind i sidste pos :o)
Du skal bruge en HTML parser hvis der også kan være Javascript, kommentarer og andet godt i din HTML.
Kurser inden for grundlæggende programmering