Crear instancias de objetos creados con TPanel

[Kandorf]

Creo que sí es eso lo que busco, lo estoy intentando, pero al crearlo no me aparece, he intentado también crearlo en un formulario nuevo, por si acaso era problema de crearlo dentro del ScrollBox, con este código;

var
  NuevaPrev: TObjPrevPelicula;
begin
  NuevaPrev:=TObjPrevPelicula.Create(Self);
end;

La primera vez lo crea (pero no se ve), la segunda vez que se llama a la función dice que ya existe un objeto con ese nombre.

Gracias por la respuesta tan rápida.

[Ñuño Martínez]

Quizá estás olvidandote de asignar el contenedor (Owner) del objeto. Prueba esto:

Código Delphi [-]
var
  NuevaPrev: TObjPrevPelicula;
begin
  NuevaPrev:=TObjPrevPelicula.Create(Self);
  NuevaPrev.Owner := SELF;
end;

Estoy suponiendo que TObjPrevPelicula es un componente visual y que SELF es una ventana TForm. Si el contenedor no es la ventana, entonces debes asignar al Owner el objeto que sea (por ejemplo un panel, el ScrollBox, etc).

[Kandorf]

Puede ser que sea eso, pero me da error al compilar, dice que la propiedad Owner es de sólo lectura...

[DarkMan]

La propiedad owner la estas especificando en la creación del componente:

Código Delphi [-]
NuevaPrev:=TObjPrevPelicula.Create(Self);

El único parámetro de Create en los objetos visuales es owner.

Me he dado cuenta de que PnlPrevPelícula es un objeto y no una clase"

En delphi, los objetos son considerados la clase mínima, por lo que todas las clases son objetos o derivan de ellos.

Tal vez deberías jugar con el parámetro "Parent" que es en el que puedes especificar la ventana padre del componente. Esta propiedad no es de solo lectura, por lo que puedes cambiarla en el momento que tu quieras.

Para encapsular los tres componentes dentro de un TPanel, tal vez deberías crear una clase o componente secundario derivado de TPanel conteniendo dichos componentes dentro.
No puedes usar el TPanel creado en un TForm, ya que los objetos que hay dentro del TPanel están definidos dentro de la clase TForm y no de la clase TPanel.

Un saludo.

[Ñuño Martínez]

Empezado por Kandorf

Puede ser que sea eso, pero me da error al compilar, dice que la propiedad Owner es de sólo lectura...

¡Ooops! Vaya despiste. Quise decir "Parent". Eso. Bueno, ya te lo han explicado y lo has solucionado, así que ya lo sabes.

[*Caro*]

Empezado por Kandorf

La primera vez lo crea (pero no se ve)

Hola Kandorf, es porque debes asignarle un Parent como te han indicado, en tu caso el Parent sería el ScrollBox.

Empezado por Kandorf

la segunda vez que se llama a la función dice que ya existe un objeto con ese nombre.

Esto es porque tampoco le estas asignando un nombre unico a cada instancia, para dejar que delphi te ponga los nombres, en su propiedad name le asignas vacio (''), si quieres ponerle tu los nombres puedes utilizar un contador e ir concatenando cada ves que crees un nuevo Frame.

Código Delphi [-]
var
  NuevaPrev: TObjPrevPelicula;
begin
 NuevaPrev := TObjPrevPelicula.Create(Self);
 NuevaPrev.Name := '';
 NuevaPrev.Parent := ScrollBox1;
 NuevaPrev.Top := aTop;
 Inc(aTop, 100);
end;

aTop lo inicializas en 0.

Saluditos

[Kandorf]

Sois la leche! Funciona todo perfectamente, era cosa el Parent, gracias también por todos vuestros consejos, por vuestra rapidez y por entendernos aunque nos expresemos a nuestra manera ^^

Saludos.