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....