Eu preciso pegar um valor entre as tags de um texto, então achei aqui no site a função:
function ExtractText(aText, OpenTag, CloseTag : String) : String;
Funcionou perfeitamente, porém com apenas o primeiro valor encontrado.
Mas se eu tiver mais TAGs iguais, pra adicionar todos valores dentro dessas TAGs iguais em um ListBox, como devo fazer, pois não encontrei em lugar nenhum. Exemplo:
<t1>teste1</t1>
<t2>teste2</t2>
<t1>teste3</t1>
<t1>teste4</t1>
<t3>teste5</t3>
Se eu pegar as tags t1 e /t1, queria exibir assim no ListBox:
teste1
teste3
teste4