Ayuda con Athread.netdata

[obum1]

ok mira, mejor lo hago de otra manera estuve pensando esto:

ya que cuesta entender asi como le hago para copiar un texto de un memo a otro apartir de una palabra por ejemplo
if pos('hola',memo1.text) then
begin
memo2.text:=memo1.text;

pero lo que hace alli es copear todo con todo el y el hola de ejemplo, ahora ¿como hago para que aparitr del hola? copia el texto
ingresado, cuando detecte el hola y siga escribiendo copie pero, no tood lo del meo si no apartir del hola asi mas especifico,
logré por hacerlo, para que si tu me ayudas aqui ya agarre idea para lograr la interrogante anterior.