Selecionar palavra em um memo

[AnimesBR]

Pessoal é o seguinte, procurei um método no google mais não consegui.

No meu programa há um botão, após o usuário clicar neste botão. Aparecerá no memo o seguinte código:

name=7e834b586a249219></TD></TR>

Porém este número entre "name=" e "></TD>.." é variável.

Gostaria de Saber se não existe alguma maneira de deletar o "name=" e o "></TD></TR>" deixando no memo apenas o número variável

que neste caso é 7e834b586a249219

Desde já agradeço..

[Jhonas]

No meu programa há um botão, após o usuário clicar neste botão. Aparecerá no memo o seguinte código:

name=7e834b586a249219></TD></TR>

Porém este número entre "name=" e "></TD>.." é variável.

Gostaria de Saber se não existe alguma maneira de deletar o "name=" e o "></TD></TR>" deixando no memo apenas o número variável

que neste caso é 7e834b586a249219

Uma das maneiras de se fazer:

procedure TForm1.Button1Click(Sender: TObject);
var S, ST : string; i : integer;
begin
  ST := '';
  for i := 0 to memo1.Lines.Count do
     begin
        S := memo1.Lines.Strings[i];
        while Pos('name=', S) > 0 do
          begin
             delete(s,Pos('name=', S),5);
             delete(s,Pos('></TD></TR>', S),11);
          end;
        st := ST + s + #13;
     end;
  memo1.clear;
  memo1.Lines.text := st;
end;

abraço