Paquetes dinámicos!

[Neftali [Germán.Estévez]]

Pues yo he probado y funciona correctamente la creación de componentes.
Los pasos que he seguido.


1º) Coger los PAS de dos componentes derivados de TEdit (AlignEdit -de Román- y EditInsideHelp -mio-). Son los primero que se me han venido a la cabeza.
2º) He creado un nuevo package y los he incluído ambos dentro. No he puesto los DCR de las imágenes para abreviar. El package se llama PExEdit.dpk y está guardado en el mismo directorio y se copila sin problemas.
3º) Creo una nueva aplicación llamada Testpk en ese mismo directorio.

4º) Antes de continuar y puesto que los componentes no lo tienen, he añadido a ambos el registro de la clase, tal y como explica en el documento anterior al que tú mencionas.

Código Delphi [-]
// package unit
initialization
  RegisterClasses([TEditInsideHelp]);
finalization
  UnRegisterClasses([TEditInsideHelp]);

Código Delphi [-]
// package unit
initialization
  RegisterClasses([TAlignEdit]);
finalization
  UnRegisterClasses([TAlignEdit]);

5º) Una vez hecho esto, el package compila perfectamente y el proyecto también. He añadido al proyecto el código para cargar el package en Runtime.

Código Delphi [-]
initialization
  Plugin := LoadPackage('PExEdit.bpl');
finalization
  if Plugin <> 0 then
    UnloadPackage(Plugin)

6º) Sólo queda hacer una cosa. En el proyecto, puesto que se van a usar carga dinámica de packages y acceso por RTTI, hay que marcar la opción "Build With runtime package" en las opciones.

7º) Para hacer algunas pruebas más he añadido una rutina que te permite modificar propiedades vía RTTI a partir de su nombre, con lo que puedes modificar propiedades de los componentes.

Funciona perfectamente.
Te dejo el proyecto completo.

Y los ha creado correctamente...