[Ledian_Fdez]

Hola chicos de este foro:

Les cuento que estoy haciendo una aplicación con del delphi7 y en mi formulario principal se me ha ocurrido crear de forma dinámica unos frame como les muestro.

Código Delphi [-]
procedure TPrincipalForm.JvXPBar5ItemClick(Sender: TObject;
  Item: TJvXPBarItem);
begin
 LiberarFrame;
 Case Item.Index of
   0:begin    // Bodegas
      miFrame:=TBodegaFrame.Create(nil);
     end;
   1:begin    // Nucleos
      miFrame:=TNucleosFrame.Create(nil);
     end;
   2:begin    // Consumidores
      miFrame:=TConsumidoresFrame.Create(nil);
     end;
 End;
 miFrame.Parent:=Panel1;
 miFrame.align:=alClient;
end;

y los libero a través de este procedimiento:

Código Delphi [-]
procedure TPrincipalForm.LiberarFrame();
begin
 if assigned(miFrame) then
   begin
    miFrame.Free;
    miFrame:= nil;
   end;
end;

Hasta ahí todo sin problema, pero ... a la hora de acceder a algunos de los componentes de esos Frame, digamos por ejemplo un TListView desde otro formulario ahi me da error, mejor dicho no he podido lograr concretar la linea de código.

Ya estan agregadas las uses Bodegas y Principal
al formulario Principal puedo acceder sin problema por ejemplo:

Código Delphi [-]
PrincipalForm.JvXPBar5.Collapsed := false;

Pero no de la mismo forma con BodegaFrame. XXX

Lo he intentado con:

Código Delphi [-]
miFrame.ListViewBodega

[Error] ActBodega.pas(154): Undeclared identifier: 'miFrame'

Código Delphi [-]
BodegaFrame.ListViewBodega

[Error] ActBodega.pas(154): Undeclared identifier: 'BodegaFrame'

Código Delphi [-]
PrincipalForm.ListViewBodega

[Error] ActBodega.pas(154): Undeclared identifier: 'ListViewBodega'

Código Delphi [-]
PrincipalForm.BodegaFrame.ListViewBodega

[Error] ActBodega.pas(154): Undeclared identifier: 'BodegaFrame'

Amigos mios no se que hacer ademas de alarme los pelos !!!

Si alguien me pudiera ayudar se los iba agradecer

Mil gracias de antemanos,
Salu2.