Ver Mensaje Individual
  #4  
Antiguo 01-10-2006
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Reputación: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Bueno. Pues el tema está en que tratas de acceder a un objeto (el Label) que se encuentra en el "Formulario 3" y, este último, no está creado, o, por mejor decir, no está correctamente "referenciado"... ¿Cómo que no está creado si tú te encargas de hacer lo siguiente?

Código Delphi [-]
procedure TForm2.BitBtn1Click(Sender: TObject);
begin
    TForm3.Create(Application);
    with Form3 do
        Verlabel;
   {
     Si lo pongo así tambíen da error
    with (ActiveMDIChild as TForm3) do
     Verlabel;  }
end;

Bueno. Fíjate que estás creando una instancia de "TForm3", pero, ¿a quién estás "asignando" dicha instancia? ¿Qué variable tendrá la referencia a dicha instancia? Para que fuera "Form3" (la variable) tendrías que hacer algo así, sencillamente:

Código Delphi [-]
procedure TForm2.BitBtn1Click(Sender: TObject);
begin
    Form3 := TForm3.Create(Application);
    with Form3 do
        Verlabel;
   {
     Si lo pongo así tambíen da error
    with (ActiveMDIChild as TForm3) do
     Verlabel;  }
end;

Y ya está... ya no tendrás problemas en hacer lo que precisas, como podrás comprobar tú mismo.
__________________
David Esperalta
www.decsoftutils.com

Última edición por dec fecha: 01-10-2006 a las 10:34:26.
Responder Con Cita