Componente dentro de otro aparece la ventana de ordenación de acceso

[Jose_Pérez]

Empezado por AgustinOrtu

Hay varias formas de tratar con componentes anidados. Hay una presentación de Ray Konopka del CodeRage X que explica muy claramente unas 3 variantes, te recomiendo que la mires

Un artículo muy interesante. Pero fíjate que los componentes que utiliza de ejemplo (TTimer, TLabel y TBevel) ninguno puede tomar el foco de entrada, por lo tanto, no aparecen nunca en las ventana de ordenación de acceso. Además no aporta nada nuevo a mi código, al menos en Delphi 5.

Empezado por AgustinOrtu

Una alternativa es utilizar sub componentes. Esto sería como el caso del TLabeledEdit en donde todas las propiedades del TLabel están disponibles para modificar.

Otra forma es publicar las propiedades del sub componente que te interesan modificar. De este modo se promueve el encapsulamiento

No es esto lo que busco.

Muchas gracias por tu amable respuesta.

[Jose_Pérez]

Revisando un poco mi código, me he dado cuenta que quizás el problema está al asignar la propiedad parent. En lugar de FDateEdit.Parent:=Self (mi component) le asigno FDateEdit.Parentt:=Parent (la ventana que lo contiene) para que FDateEdit (es un botón de edición) se muestre junto al TSpecialEdit. Mii intención es encapsular los dos componentes para que parezcan uno solo.

Código Delphi [-]

// Cuando se da una condición lo hago visible asignandole la propiedad Parent.

procedure TSpecialEdit.WMPaint(var Message: TWMPaint);
begin

 inherited;

  If Condicion Then
     begin

     If FDateEdit.Parent=Nil Then
        FDateEdit.Parent:=Parent {<- probablemente el problema está aquí}

     end
     else
     FDateEdit.Parent:=Nil;

end;