hola, tengo un form "FrmFacturacion" en una bpl y exporto una procedimiento para llamarlo desde mi aplicacion :
Código Delphi
[-]
procedure cFacTrn;
begin
FrmFacturacion := TFrmFacturacion.Create(Application);
FrmFacturacion.ShowModal;
EXIT;
end;
exports cFacTrn;
y de esta manera lo llamo desde mi aplicacion:
Código Delphi
[-]
procedure TFrmPrincipal.btnFacturacClick(Sender: TObject);
var cFacTrn : procedure;
begin
PckgModuleFac := LoadPackage('ModFac.bpl');
if PckgModuleFac <> 0 then
try
@cFacTrn := GetProcAddress(PckgModuleFac, 'cFacTrn');
cFacTrn
except
on e:Exception
do
begin
ShowMessage('Error al cargar ModFac.Bpl '+#13+pchar(e.Message)) ;
end;
end;
end;
todo esto me funciona perfectamente, el problema es que estoy intentando mandarle parametros al formulario que esta en la bpl. algo asi:
Código Delphi
[-]
procedure cFacTrn(par:integer);
begin
MessageDlg('Parametro'+inttostr(par),mtInformation, [mbOK], 0);
FrmFacturacion := TFrmFacturacion.Create(Application);
FrmFacturacion.ShowModal;
EXIT;
end;
exports cFacTrn(par:integer);
no he podido lagrar mandarle un parametro a un procedimiento exportado de una bpl.....
espero puedan ayudarme....
Saludos!!!!