Crear Memo Temporal

[AGAG4]

Com puedo Crear un Memo ó X Componente en tiempo de Ejecución, ya lo intente con este ejemplo pero me marca error "Control hast No parent Window"
tengo el siguiente código;

Código Delphi [-]
var
Memo : TMemo;
i:byte;
begin
Memo := TMemo.Create(Self);//Ya lo intente con Nil y me lanza el mismo Error
for I := 0 to tArbol.Items.Count - 1 do
Memo.Lines.Add(tArbol.Items[i].Text);

El objetivo de crear un Memo temporal, es decir aprovechar la propiedad Lines para añadir el contenido a un Campo BLOB de una Tabla (FireBird 1.50)


Agradezco cualquier comentario.