Aplicación del atributo Parent. La gente suele pasar por alto la existencia del atributo Padre. Entonces déjelo mostrar su poder.
Mira estas cosas buenas:
unidad Edit1;
interfaz
usos
Windows, Mensajes, SysUtils, Clases, Controles, StdCtrls;
tipo
TSParent = clase(TEdit)
Privado
{Declaraciones privadas}
protegido
{ Declaraciones protegidas }
público
{Declaraciones públicas}
publicado
{ Declaraciones publicadas }
propiedad Padre;
fin;
Registro de trámites;
implementación
Registro de trámites;
comenzar
RegisterComponents('Muestras', [TSParent]);
fin;
fin.
Instale este control. Crea un nuevo proyecto.
Arrastre un control TSParent en la página Muestras. ¿Diría que este no es un control TEdit?
Si miras de nuevo, tiene un atributo principal adicional. Esto es sorprendente, su contenedor se puede personalizar a voluntad durante el diseño y se puede usar como contenedor independientemente de si otros controles tienen atributos de contenedor o no. TPanel, TEdit, TMemo es como un demonio que existe en todas partes.
Este control tiene dos desventajas. 1) El formulario no se puede incluir en la lista de atributos principales. ¿Por qué? Piénsalo tú mismo. 2) La lista de propiedades principales puede enumerar sus propios controles.
Pero es fácil resolverlo. Simplemente cree usted mismo un editor de propiedades.