Manejo de Objetos TImage en Arreglo o Similar

[WhiteJack]

Empezado por maeyanes

Hola...

Para poder ver las imágenes en el formulario, tienes que asignarles su propiedad Parent:

Código PHP:

ImageM[i][j]->Parent = Form1; 


Saludos...

Gracias maeyanes, la linea me da un error de Violacion de Acceso!, a que se podra deber.

[[escafandra]]

Tal y como lo planteas, en un array estático, debes hacerlo así:

   #include <jpeg.hpp>
//.........................................

   TImage* ImageM[5][5];

   for(int i=0;i<5;i++){
      for(int j=0;j<5;j++){
          ImageM[i][j] = new TImage(this);
          ImageM[i][j]->Parent = Form1;
          ImageM[i][j]->SetBounds(10*i,10*j,10,10);
          ImageM[i][j]->Picture->LoadFromFile("img.jpg");
      }
   }

En Builder un componente, como lo es TImage, es un puntero. Debes realizar un array de punteros...


Saludos.

[WhiteJack]

Empezado por escafandra

Tal y como lo planteas, en un array estático, debes hacerlo así:

   #include <jpeg.hpp>
//.........................................

   TImage* ImageM[5][5];

   for(int i=0;i<5;i++){
      for(int j=0;j<5;j++){
          ImageM[i][j] = new TImage(this);
          ImageM[i][j]->Parent = Form1;
          ImageM[i][j]->SetBounds(10*i,10*j,10,10);
          ImageM[i][j]->Picture->LoadFromFile("img.jpg");
      }
   }

En Builder un componente, como lo es TImage, es un puntero. Debes realizar un array de punteros...


Saludos.

Gracias escafandra y a los demas en general, ha funcionado perfectamente! pero ahora me ha surgido la duda de como agregar el evento a esto arreglo, ya que el mismo no aparece en el Object Inspector, por ejemplo un OnClick ImageM[i][j]->OnClick ??.

[[escafandra]]

//---------------------------------------------------------------------------
void __fastcall TForm1::Imagelick(TObject *Sender)
{
  Beep();
  Label->Caption = ((TImage*)Sender)->Name;
}


void __fastcall TForm1::Button1Click(TObject *Sender)
{
   TImage* ImageM[5][5];

   for(int i=0;i<5;i++){
      for(int j=0;j<5;j++){
          ImageM[i][j] = new TImage(this);
          ImageM[i][j]->Parent = Form1;
          ImageM[i][j]->OnClick = Imagelick;
          ImageM[i][j]->SetBounds(10*i,10*j,10,10);
          ImageM[i][j]->Picture->LoadFromFile("img.jpg");
          ImageM[i][j]->Name = "ImageM"+IntToStr(i)+IntToStr(j);
      }
   }
}
//---------------------------------------------------------------------------

Saludos.

[WhiteJack]

Todo a funcionado perfectamente, ya solo me resta agregar la logica para el pequeño juego.

Gracias nuevamente a todos.