Estoy haciendo pruebas con un programa que trabaja con paquetes dinamicos de delphi (bpl) lo crea todo perfectamente pero quiero que desde el paquete se puedan acceder a los datos publicos del formulario que lo creo pero si lo linko normalmente me da el sisguente warning:
[DCC Warning] Package1.dpk(36): W1033 Unit 'Unit1' implicitly imported into package 'Package1'
y cuando ejecuto la aplicaccion me da un access violation al intentar aceder a los datos del formulario padre
al paquete lo estoy llamando con el siguiente codigo:
Código:
procedure TForm1.Button1Click(Sender: TObject);
var
PackageModule: HModule;
AClass: TPersistentClass;
begin
Etiqueta:='Hola';
PackageModule:=LoadPackage('Package1.bpl');
if PackageModule<>0 then
begin
AClass:=GetClass('TForm2');
if AClass<>nil then
begin
with TcomponentClass(Aclass).Create(Application) as TForm do
begin
ShowModal;
Free;
end;
UnLoadPackage(PackageModule);
end;
end;
end;
mi idea es cojer el valor de la variable etiqueta desde el TForm2
el programa con el que estoy haciendo las pruebas es este:
http://www.asinval.com/paquetes.zip