Mostrar texto de un DBMemo a partir de un caracter

[ecfisa]

Hola exequielmatias1.

Supongo que algo no has copiado bien, ya que el código que te puse en el mensaje anterior hace exáctamente lo que buscas.

Te adjunto un demo con dos TDBMemos y un TDBNavigator para que puedas probar con tranquilidad. El primer DBMemo muestra el texto original y el segundo sólo las subcadenas.

Usé la tabla biolife.db con BDE dado que no uso Access y solo dispongo de las tablas que trae Delphi (ninguna con memo). Pero el código funcionará del mismo modo con los componentes ADO.

Recordá que al extraer las subcadenas en el evento AfterScroll, luego de modificado el texto, deberás mover el cursor para ver los cambios.

Saludos.