Cargar TImage

[dec]

Hola,

Pues... del código que has mostrado últimamente, ya digo, lo único que hecho en falta es la asignación de la propiedad "Parent" del "TImage":

Código Delphi [-]
  Image1 := TImage.Create(self);
  Image1.Picture.LoadFromFile('corazon.jpg');
  Image1.Height := 17;
  Image1.Width := 17;
  Image1.Top := 32;
  Image1.Left := 152;

  // Añadir esto
  Parent := Self;

Sin embargo... veo algo extraño en el código, y es el identificador "Image1". Normalmente, estos identificadores corresponden a componentes creados en tiempo de diseño, por el propio Delphi, mediante la técnica de arrastrar un componente desde el Inspector de Objetos a un determinado formulario.

Si lo que haces es esto último, entonces no es que falte algo en tu código, sino que tal vez sobre. En efecto, no necesitas crear un componente que ha sido añadido en tiempo de diseño, porque el propio entorno se encargará de crearlo. Es decir, entonces en tu código sobraría esta instrucción:

Código Delphi [-]
Image1 := TImage.Create(self);

Ya tienes el componente en el formulario, luego, no necesitas crearlo. Dándole vueltas, creo que he pasado por alto esto de tu primer mensaje: "ya que destruyo y vuelvo a crear la imagen varias veces." Si lo que necesitas es cargar distintas imágenes en un mismo "TImage", simplemente, cárgalas, usa el "Picture.LoadFromFile()", sucesivamente, puesto que las imágenes, si no me equivoco, no se solapan, sino que la última sustituirá a la que hubiera antes.

PD. Tal vez podría añadirse algo que no parece muy evidente. Para "quitar" una imagen de un componente "Timage", no hay ningún método preparado, pero, en su lugar puede usarse algo así:

Código Delphi [-]
Image1.Picture := nil;

Esa instrucción no destruirá el objeto "TImage", de modo que podrá cargarse en el mismo una nueva imagen (o no).

[Isuri]

Muchas gracias dec, no he hecho exactamente lo que tu me has dicho pero me has dado otra idea, y ya lo he arreglado.

Gracias!!

[dec]

Hola,

Hombre, ¡pero dí que has hecho! Igual resulta interesante.

[Isuri]

Es que no se como no se me ha ocurrido antes, sin mas, en un momento dado queria que no se viera esa imagen, y mas tarde que se volviera a ver. al principio he optado x la idea de destruir y volver a crear la imagen, en eso tenia el problema, en crearla en tiempo de ejecucion. pero es tonteria hacer esto, teniendo la propiedad 'visible'; por lo que lo unico que he hecho ha sido poner visible a false o true, y la imagen la he creado en tiempo de diseño.

gracias x todo dec!!

[dec]

Hola,

Pues sí, ahí estaba otra solución.