Ver Mensaje Individual
  #3  
Antiguo 04-10-2004
Mick Mick is offline
Miembro
 
Registrado: may 2003
Posts: 405
Reputación: 22
Mick Va por buen camino
Cita:
Empezado por 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"

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.
Un Memo es un objeto visual, que no esta pensado para hacer lo que pretendes, para hacer eso existen otras clases no visuales como el TStringList, que esta pensada precisamente para hacer cosas como la que intentas, ademas de utilizar menos recursos:

Código Delphi [-]
var
Lista : TStringList;
i:byte;
begin
Lista := TSTringList.Create;
try
  for I := 0 to tArbol.Items.Count - 1 do begin
    Lista.Add(tArbol.Items[i].Text);
  end;
  ...
  ...
finally
  Lista.Free;  // Al final, destruimos la lista sino tendremos un memory leak
end;
end;
Responder Con Cita