Olá, pessoal. Tudo bem? Sou novato aqui e também no Delphi. Estou com uma dúvida que pode ser simples para alguns (que possam me ajudar) mas não estou conseguindo. Talvez porque eu não tenha ainda entendido o conceito correto da forma de pesquisa. A minha dúvida é a seguinte: Tenho um TMemo já com o conteúdo de um script java e dentro desse script (retirado do código fonte de um site), nesse Memo tenho vários caracteres, porém existe um padrão que gostaria de pegar esses valores.. Seria mais ou menos assim: ```

// ERIKA VIVO MATRICULA //

FIQUE COM A GENTE./. COMEÇA AGORA O ESTV PRIMEIRA EDIÇÃO.// O ÚNICO JORNAL QUE COM AS NOTÍCIAS DO NORTE E NOROESTE DO ESTADO.//

////RODA VH//////

","NORMAL"=="BLOCO", "NORMAL"=="INTERVALO", "00:47", "01:00", "01:47", "000");Espelho.AddScript("319022","VIVO ÓLEO","SEM ÓLEO
PRAIAS LIMPAS NO LITORAL NORTE

ROSI BREDOFW - ITAÚNAS

Yuri Walter, professor Ufes/Ceunes","

DE CONCEIÇÃO DA BARRA, A ROSI BREDOFW VEM AO VIVO PRA FALAR DOS TRABALHOS PREVENTIVOS LÁ CIDADE... É A PREOCUPAÇÃO COM ESSE ÓLEO NO MAR DO NORDESTE QUE ESTÁ SE DESCOLANDO SENTIDO SUL... CHEGOU NO SUL DA BAHIA BEM DO NOSSO LADINHO MAS POR AQUI NADA NÉ?// PRAIS LIMPAS...

//VIVO//

","NORMAL"=="BLOCO", "NORMAL"=="INTERVALO", "00:17", "01:30", "02:13", "001");Espelho.AddScript("319005","CAPACITAÇÃO VOLUNTÁRIOS (ROSI CHAMA)","
IMAGENS - RAPHAEL VERLY

AURIKSON CORRÊA - COORDENADOR VOLUNTÁRIO COMITÊ DE CRISE

VOLTA SONORA

VOLTA SONORA

ANDRÉ TEBALDI - SECRETÁRIO DE MEIO AMBIENTE DE CONCEIÇÃO DA BARRA

VOLTA SONORA

VOLTA SONORA

ROSI BREDOFW - ITAÚNAS","

////////////RODA VT//////////////

DEIXA NA SONORA '...NOSSOS MANGUEZAIS.'

","NORMAL"=="BLOCO", "NORMAL"=="INTERVALO", "00:01", "03:00", "03:01", "002");Espelho.AddScript( Eu gostaria de pesquisar nesse código no Memo1 por exemplo e jogar para outro Memo os seguintes números dessa sequencia. Só pra constar que esses números não são fixos.. muda a cada dia. então eu gostaria de pegar esses números.. gostaria de achar primeiro o primeiro item, identificado por "000" e voltar algumas casas e pegar o "01:47"(sem as aspas). O mesmo padrão para o restante do registro, como no segundo item identificado por "001" e voltar algumas casas e pegar o valor "2:13"(sem as aspas). Desde já eu agradeço muito quem souber e puder dar uma luz. Obrigado. ```

Fabiano Pereira

Pesquisar por sequencia de números em Memo Delphi