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.
