Código Delphi [-] // Datos a extraer del memo duracion=12:25" var cad:string; begin cad := 'duracion=12:25"'; Memo2.Lines.Add(Copy(Memo1.Text, Pos(cad, Memo1.Text), Length(cad))); end;
// Datos a extraer del memo duracion=12:25" var cad:string; begin cad := 'duracion=12:25"'; Memo2.Lines.Add(Copy(Memo1.Text, Pos(cad, Memo1.Text), Length(cad))); end;