Ver Mensaje Individual
  #3  
Antiguo 05-09-2005
Aldo Aldo is offline
Miembro
 
Registrado: ene 2004
Posts: 46
Reputación: 0
Aldo Va por buen camino
Hola Chicolita:

Vamos a ver. Eso que quires hacer es fácil como dices. Solo debes crear en tu componente principal propiedades que sean a su vez otros componentes heredados de un TPersistent. Es decir Supongamos que estás creando un componente que tendrá una propiedad que se llame Layout y esta a su vez se compone de otras propiedades individuales que son Left, Top, Height, Width.

En este caso creas un componente que herede de TPersistent ( Ej TLayout ) que contenga las cuatro propiedades antes mencionadas y en tu componente principal creas una propiedad del tipo TLayout

Un ejemplo de código

Código Delphi [-]
 TLayout = Class( TPersistent )
 private
   FLeft : Integer;
   {...}
   FWidth : Integer;
   public
   {...}
   protected
   {...}
   published
     property Left : Integer read FLeft write FLeft;
     property Width : Integer read FWidth write FWidth;
   end;
 
   TMyComponent = Class( TComponent )
   private
     FLayout : TLayout;
   public
   protected
   published
     property Layout : TLayout read FLayout write FLayout;
 end;
Espero que te haya ayudado en lo que querías hacer.

Un saludo Aldo

Última edición por dec fecha: 05-09-2005 a las 19:24:11. Razón: (Encerrar el código fuente en la etiqueta DELPHI)
Responder Con Cita