Pasar datos de una tabla a un memo

[Neftali [Germán.Estévez]]

¿Seguro que ya tienes los 200 caracteres?
¿Tienes los memos bien numerados?

Sigo sin entenderlo muy bien, pero prueba pasando éstas líneas después del if (justo antes del Until):

Código Delphi [-]
   mm.lines.add(FieldByName('Codigo').AsString + ('-------'));
  Next;