Ver Mensaje Individual
  #2  
Antiguo 22-08-2011
Avatar de look
look look is offline
Miembro
 
Registrado: sep 2007
Ubicación: The Shire
Posts: 656
Reputación: 19
look Va camino a la fama
solucion:

Código Delphi [-]
procedure TFrmPrincipal.btnFacturacClick(Sender: TObject);
 var cFacTrn: procedure(S:Integer); stdcall;
begin
    try
      PckgModuleFac := LoadPackage('ModFac.bpl');
      if PckgModuleFac <> 0 then
      @cFacTrn := GetProcAddress(PckgModuleFac,'cFacTrn');
       cFacTrn(1);
    except
      on e:Exception
      do
      begin
        ShowMessage('Error al cargar ModCxc.Bpl '+#13+pchar(e.Message)) ;
      end;
    end;
end;


esta fue la solucion....

gracias por tomar su tiempo en leer este post....
__________________
all your base are belong to us
Responder Con Cita