|
Yo creo que hay algo de código que no nos pones y que es el causante del error.
Ahora bien, ya te han dicho que posiblemente quien se queja de no tener padre sea el panel y no las etiquetas. Puedes salir de dudas asignando la propiedad Name, tanto del panel como de las etiquetas y demás controles que crees, al principio del constructor, inmediatamente después de inherited. De esa forma, el mensaje de error dirá el nombre de la componente que da el problema.
Por otra parte puedes hacer una depuración del código de tu componente. Intenta primero crear una componente en tiempo de ejecución y mira si te da el mismo error; así sabrás exactamente en qué línea se produce.
Si eso no da resultado entonces el error sólo se produce en tiempo de diseño, lo cual hace un poco más difícil la depuración, pero puede hacerse.
Ahora, cambiando un poco de tema. Self no es una propiedad, sino un parámetro (escondido) que se pasa a cualquier método de un objeto, de manera que lo que se indica del with, no aplica. Self siempre será el objeto al que pertenece el método.
Finalmente, si el número de etiquetas es fijo, yo no me complicaría usando un TObjectList; te hará más difícil la escritura al tener que hacer moldeos de tipo para ajustar las propiedades de sus elementos.
// Saludos
|