Club Builder

[Max]

Hola Foro

Tengo el siguiente inconveniente

Tengo en mi proyecto 2 Forms

En el Form principal un objeto Image (Image1) al cual le asigno una imagen bmp mediante un objeto OpenPictureDialog; y tambien tengo un boton (Button1).

En el Form 2 tengo otro objeto Image

Lo que quiero hacer es que al presionar el boton en el Form1 la imagen que esta en el objeto Image1 del form principal se copie en el objeto Image del Form2.

Alguien puede decirme como hago esto, ya que lo he tratado de esta forma

/* en el Form2 */
Image1->Picture->Bitmap->Assign(Form1->Image1->Picture->Bitmap);

y no me ha dado resultado.

Gracias

[Gregus]

Que tal:

Vamos por partes.
Form1, Image1, Unit1.cpp, Unit1.h, pertenecen a la forma principal
Form2, Image1, Button1, Unit1.cpp, Unit1.h, pertenecen a la forma secundaria

Primero debes hacer un include de los .h de cada forma en los respectivos cpp, de la siguiente manera:

En el Unit1.cpp escribes: #include "Unit2.h"
En el Unit2.cpp escribes: #include "Unit1.h"

Despues de esto en el boton de la forma 2 haces esto (asumo que la forma principal ya tiene una imagen asignada para el image):

void __fastcall TForm1::Button1Click(TObject *Sender)
{
Image1->Picture=Form1->Image1->Picture;
}

A mi me funciona, haz la prueba.

Suerte
_________________
--Gregus

[TOÑO]

HOLA:


Vayamos por partes,
He leido el otro mensaje tuyo, y es normal que se te quede colgado (por cierto muy currada la explicacion de Angel).


Image1->Picture=Form1->Image1->Picture;
Es una burrada estas asignando la misma direccion de memoria a dos componentes, como son componentes iguales, en principio traga, pero cuando destruyes uno, la direccion de memoria se libera creando un error en el otro componente que apuntaba a el mismo espacio.


Mi consejo, desde el Form1 al pinchar el boton.

TForm2 *a = new TForm2(this);
a ->Image1 ->Picture ->Bitmap ->Assign(Image1 ->Picture ->Bitmap);
a ->ShowModal();
a ->Free();

Veras como no tienes problemas en el destructor.

By.

[Gregus]

Hola a todos:

Lo cierto es que TOÑO tiene razón, la instrucción: Image1->Picture=Form1->Image1->Picture;

crea confilctos utilizamos el destructor, Pero funciona, es una forma burda de hacer las cosas pero creo que cumple con lo que se pregunta. La solución de TOÑO no funciona del todo bien y hay que hacerle un par de modificaciones.

En todo caso, disculpen la ignorancia, pero aquí algunos estamos aprendiendo.

Chao.
_________________
--Gregus

[_Leo]

[Gregus]

Hola a todos.

Gracias Leo por la aclaración, la verdad es que ya me estaba haciendo trabas con este asunto, puesto que he probado esta signación tal cual muchas veces y no me había presentado problema, incluso me ha funcionado bien con imágenes JPG.

Suerte
_________________
--Gregus

[TOÑO]

HOLA:

Curioso, años maravillandome de la grandeza de la herencia de clases, la encapsulacion, la potencia de las herramientas rad y en cuanto veo algo que se parece a un misero puntero salta la bestia c pura y dura que llevo dentro, que le vamos a hacer me estare volviendo viejo y quisquilloso, de todas formas muchas por estar atento a las respuestas.