Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 31-10-2007
andresenlared andresenlared is offline
Miembro
 
Registrado: oct 2003
Posts: 153
Poder: 21
andresenlared Va por buen camino
Question Problemas con paquetes

Hola a todos.
Tengo un problema al ejecutar el exe y cargar dinamicamente el bpl. Les cuento que tengo hasta el momento.

1. adicione al paquete los formularios que necesito esten juntos por el proceso que se desarrolla.
2. Tenia un problema con los Txtradev, en donde me informava que: Unit TXtraDev was compiled with a different version of ppFilDev.TppFileDevice. para este error, cargue el paquete Txtradev, y modifique lo siguiente: {$IMPLICITBUILD OFF}. compile el paquete y el error desaparece.
3. En el proyecto principal para cargar el paquete tengo lo siguiente:
Código Delphi [-]
procedure TfrmPrincipal.A_Reporte1Execute(Sender: TObject);
var
  PackageModule: HModule;
  repnov: Tform;
  formClass: TformClass;
begin
 MessageDlg(' Asegurese que no se estén ingresando novedades,durante la ejecución '+#13+#10+'de este proceso', mtWarning, [mbOK], 0);
 //************
 PackageModule := LoadPackage('D:\desarrollo\seguro\Version 2007\Seguro\bpl2\package1.bpl');
  if PackageModule <> 0 then
  begin
    formclass:=Tformclass(getclass('TFrmRepNov'));
    if Assigned(formclass) then
      begin
        repnov:=formClass.Create(Application);
            try
             SetPropValue(repnov,'Ttransaccion',DmSeguro.Seguro_T.Name);
             SetPropValue(repnov,'Tbase',DmSeguro.Seguro.Name);
             SetPropValue(repnov,'Fecha_T',fecha_trabajo);
             SetPropValue(repnov,'inicializar',True);
             repnov.ShowModal;
            finally
              repnov.Free;
         end;
      end
    else
      ShowMessage('Formulario no Existe');
     UnloadPackage(packagemodule);
     end
   else
      ShowMessage('Paquete no encontrato...');
 //************
4. Registro el formulario(TFrmRepNov) en el paquete
Código Delphi [-]
initialization
  registerclass(TFrmRepNov);
Finalization
  unregisterclass(TFrmRepNov);
Lo anterior lo pongo al final del formulario.


5. para el proyecto principal en las propiedades, habilito Rumtime packages.

6. los formularios que estan en el paquete no estan en el proyecto principal.

7. cuando compilo el proyecto, me aparece el siguiente error, y se produce en la linea:

PackageModule := LoadPackage('D:\desarrollo\seguro\Version 2007\Seguro\bpl2\package1.bpl');

El error dice: A class tppToolbar already exists.

cualquien idea que tengan para revisar, muchas gracias.
Uso firebird y delphi 7
Responder Con Cita
  #2  
Antiguo 31-10-2007
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.285
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por andresenlared Ver Mensaje
El error dice: A class tppToolbar already exists.
Es como si esa clase se estubiera intentando registrar más de una vez.
Elimina todas las DCUs/DCP/BPL correspondientes al package, muevelo a otra ubicación y vuelve a compilar el proyecto, para descartar que sea algo relacionado con el package.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #3  
Antiguo 31-10-2007
andresenlared andresenlared is offline
Miembro
 
Registrado: oct 2003
Posts: 153
Poder: 21
andresenlared Va por buen camino
Gracias por tu ayuda, pero ya hice lo que propones y el error continua
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Paquetes dinamicos xerkan Varios 14 22-10-2007 16:05:58
Paquetes debian Io Linux 2 05-02-2007 17:37:10
Configurar paquetes roman OOP 5 18-06-2004 22:31:15
paquetes ¿? acertij022 Internet 0 20-08-2003 16:06:31
Paquetes en runtime rezahe Varios 4 25-05-2003 06:27:26


La franja horaria es GMT +2. Ahora son las 13:09:10.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi