Cargar Propiedades en el Object Inspector

[droguerman]

saludos:

Tengo la Siguiente Pregunta, como cargar las propiedades de una propiedad que no derive de TComponent en el Object Inspector, me explico mejor, han visto que los derivados de TCollectionItem como los Columns de un dbGrid cargan en el Object Inspector, como se puede hacer??

[dec]

Hola,

A ver si dices algo así... (que hace poco me he pegado con ello):

Código Delphi [-]
unit UComponente;

interface

uses
  Classes;

type
  TElementos = class;
  
  TComponente = class(TComponent)
  private
    FElementos: TElementos;
    procedure SetElementos(elementos: TElementos);
  public
    constructor Create(AOwner: TComponent); override;
    destructor Destroy(); override;
  published
    property Elementos: TElementos read FElementos write SetElementos;
  end;

  TElemento = class(TCollectionItem)
  private
    FNombre: string;
  published
    property Nombre: string read FNombre write FNombre;
  end;

  TElementos = class(TCollection)
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Samples',[TComponente]);
end;

{ TComponente }

constructor TComponente.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  FElementos := TElementos.Create(TElemento);
end;

destructor TComponente.Destroy();
begin
  FElementos.Free();
  inherited Destroy();
end;

procedure TComponente.SetElementos(elementos: TElementos);
begin
  FElementos.Assign(elementos);
end;

end.

[droguerman]

ok es casi perfecto solo que culpa mía me faltó especificar, no quiero usar el TCollection, porque le faltan métodos para antes y despues de insertar o eliminar un elemento, y si los tiene no funcionan bien, ya he probado con added y deleted en delphi 7 y estan marcados como deprecated, es decir quiero algo parecido a esto:

Código Delphi [-]
   TComprobante = class(TPersistent)
      cantidad : extended;
      nombre : string;
   end;


....
 private
     fcomprobantes: TList; //para guardar mis comprobantes
 published
     property  comprobantes:TList;

de crear el editor de propiedades y listar los items me encargo yo, solo que no se como acceder al object inspector para poner en ahi la cantidad y nombre.


saludos y gracias dec