Ver Mensaje Individual
  #1  
Antiguo 19-01-2008
Avatar de quinqui
quinqui quinqui is offline
Miembro
 
Registrado: jun 2006
Posts: 14
Reputación: 0
quinqui Va por buen camino
Question Copiar Bitmap de un TImage a otro TImage

Tengo un TImage creado con Delphi en tiempo de diseño. El Timage tiene todos sus valores bien: la imagen (un bmp), ancho, alto, etc...
Ahora bien, en tiempo de ejecución requiero crear nuevos TImage's, y con las mismas propiedades que las del creado en diseño.
Pero no me resulta, o sea, a pesar de que el programa no se cae, no muestra nada en pantalla (no aparece el nuevo TImage).

Pensaba que poniendo :
Código Delphi [-]
nuevaImg := TImage.Create(Self);
nuevaImg.Picture := antiguaImg.Picture;
{...copiando demás propiedades...}
nuevaImg.Visible := True;
funcionaría, pero no lo hace.
¿Cómo se debe hacer? ¿Se debe usar un método y no una mera igualación?

Muchas gracias de antemano!!!

PD: Igualando nuevaImg.Picture.Bitmap := antiguaImg.Picture.Bitmap tampoco funciona.
Responder Con Cita