Pasar datos de una tabla a un memo

[Cosgaya]

hola neftali: gracias por el codigo
pero no funciona bien, porque la condicion no la cumple haste que le vuelve a apretar al boton. no tengo muxa idea pero cre que puede ser... porque pasa los datos de la base de datos al memo antes de que termine de contar los caracteres osea, que es mas rapido el que pase los datos al memo que el contar los caracteres por eso no devuelve el valor a tiempo...
soy nuevo en delphi... esta es la conclusion a la que he llegado no se si sera una barbaridad lo que acabo de decir, si es asi... perdonen