Ver Mensaje Individual
  #4  
Antiguo 04-04-2007
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Bueno, ahi va paso a paso, según acabo de hacerlo:
  1. Creas tu formulario en el IDE y agregas la propiedad deseada. Por ejemplo:

    Código Delphi [-]
    type
      TrmForm = class(TForm)
      private
        FAuthor: String;
      published
        property Author: String read FAuthor write FAuthor;
      end;

  2. Guardas el formulario, digamos en urmform.pas.

  3. Agregas el formulario al repositorio (menú contextual del formulario|Add to Repository...)

  4. Creas un paquete de ejecución (Runtime only), digamos rmforms.dpk, al que agregas el formulario (es decir, agregas urmform.pas en la sección Contains). Compilas y guardas el paquete.

  5. Creas un paquete de diseño (Designtime only), digamos rmformsdesign.dpk, al que agregas los paquetes designide y rmforms en la sección Requires (simplemente seleccionas la sección, oprimes el botón Add y escribes designide y repites para rmforms). designide es parte de Delphi y rmforms es el paquete de ejecución que acabas de crear.

  6. Creas una nueva unidad, digamos urmformsreg.pas en el paquete de diseño (File|New|Unit) que se verá así:

    Código Delphi [-]
    unit urmformsreg;
    
    interface
    
    procedure Register;
    
    implementation
    
    uses
      urmforms, DesignIntf, DesignEditors;
    
    procedure Register;
    begin
      RegisterCustomModule(TrmForm, TCustomModule);
    end;
    
    end.
  7. Compilas, instalas y guardas el paquete.

Con esto debe bastar. Para usar un fomulario de éstos, recuerda que debes heredar (opción inherit en el repositorio).

// Saludos
Responder Con Cita