Ver Mensaje Individual
  #1  
Antiguo 19-01-2017
Jose_Pérez Jose_Pérez is offline
Miembro
 
Registrado: may 2003
Posts: 156
Reputación: 22
Jose_Pérez Va por buen camino
Componente dentro de otro aparece la ventana de ordenación de acceso

Hola:

Estoy trabajando con Delphi 5. He desarrollado un componente que, a su vez, utiliza un componente ya existente. Funciona muy bien. El problema es que el componente incluido dentro del desarrollado por mí se muestra en la ventana de ordenación de acceso (tab edit order), no así en el inspector de objetos. ¿Qué estoy haciendo mal?

Además, en tiempo de diseño al pasar el ratón sobre el componente en desarrollo, en la eqtiqueta emergente (hint) se muestra el componente incluido.

Por favor, ver código y jpeg adjuntos.

Código Delphi [-]


  TSpecialEdit = class(TEdit)
  private
    FDateEdit: TNewDateEdit;


Constructor TSpecialEdit.Create(AOwner: TComponent);
Begin

  Inherited Create(AOwner);

  FDateEdit:=TNewDateEdit.Create(Self);

  // Inicialmente el componente no está visible

End;

// 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

     end
     else
     FDateEdit.Parent:=Nil;

end;
Imágenes Adjuntas
Tipo de Archivo: jpg taborder.JPG (16,5 KB, 10 visitas)
Tipo de Archivo: jpg iobjetos.JPG (6,7 KB, 10 visitas)
Responder Con Cita