Problema con las clases

[dec]

Hola,

Pareciera que la instrucción:

Código Delphi [-]
boton1 := boton1.create(nil);

Debería ser algo así como:

Código Delphi [-]
boton1 := TButton.create(nil);

Y, por otro lado, sabe que si no asignas dueño al botón, serás tú el encargado de destruir el botón, pero, si haces algo como:

Código Delphi [-]
boton1 := TButton.create(self);

Estarás dejando esa "carga" al propio componente "MiClase".

[[Lepe]]

¿TMiClase de quien hereda?

Porque si es del tipo:

Código Delphi [-]
type TMiClase = Class

Así estas heredando de TObject, y que el padre de un botón sea un TObject dará errores en ejecución.

Para tu idea, es mejor que uses un TFrame, haces uno que conste de un label, tedit y botón. Y ahora desde tu programa principal haces:

Código Delphi [-]

var Fr :TMiFrameCreada;
     TheTop, i:integer;

begin 
  TheTop := 20;
  for i:= 0 to 29 do
  begin 
     fr := TMiFrameCreada.Create(Form1);
     fr.top := TheTop;
     TheTop :=  TheTop + fr.top + 20;  // por poner algo
     fr.parent := form1;
 end;

listo, 30 botones, 30 labels y 30 edits creados.

Si no es lo que quieres, explica con mas detalles "tu idea"

Saludos