¿como hacer que un string tenga retornos de carro saltos de linea?

[JXJ]

hola

tengo un problema quiero dar formato a un string que me devuelve una query

tengo esto asi.

Código Delphi [-]
select cadenalarga from tabla_sucesos
 
execsql;
 
 for i := 0 to Query1.RecordCount - 1 do
            begin
      cadenalarga := Query1.Fields[0].AsString;
             end
 
memo1.lines.add(cadenalarga );

pero la cadena es demasiado larga
como esto

cadena ubien larga odnsaodinasocnascosanco ncosndcccadena ubien largaodnsaodinasocnascosancocosndcccadenaubienargadnsaodinasocnascosanco ncosndcccadena ubien larga odnsaodinasocnascosanco ncosndcc

hay forma de que se limite digamos aun ancho de 20 caracteres
y luego mostrarla en el memo


asi

cadena ubien larga o
dnsaodinasocnascos
anco ncosndcccdas