Ver Mensaje Individual
  #1  
Antiguo 21-04-2007
jevo19100 jevo19100 is offline
Miembro
 
Registrado: ene 2006
Posts: 18
Reputación: 0
jevo19100 Va por buen camino
Usar propiedades de Formularios en Memoria con arreglos

Hola

Uso D7. El caso es el siguiente:

Tengo un form llamado TfrmTemp, entonces en vez de crearlo por su variable (frmTemp) he decidido hacerlo con otra variable (de un procedimiento) derivada del TForm.

Como se aprecia aqui!
Código Delphi [-]
procedure Crear(Form:TFormClass);
var
  pT mpFrm:Tform;
begin
  pTmpFrm:=Form.Create(Application);
  pTmpFrm.show;
end;
procedure Ejemplo;
begin
  Crear(TfrmTemp);
end;
Entonces,
Como hago referencia a este formulario?, ya que con pTmpFrm no se puede hacer.
Como puedo saber si 'X' formulario está creado?(Assigned())
Y despues de saber si esta o no creada, poder usar unas de sus propiedades.

No se si con ^ (Form^) se podría resolver ya que tiene que ver con los punteros. La verdad es que no se manejar bien eso.

Este embrollo vino a raiz de que quise utilizar un arreglo, algo como
Código Delphi [-]
  procedure AsignarFrm(ArForm:array of TForm);
  var
    I:Integer;
  begin
    for I:= 0 to High(ArForm) do
      if Assigned(pArForm[i]) then
        pArForm[i].Repaint;
  end;
procedure  Ejemplo2;
begin
  AsignarFrm([frmTemp, frmprincipal,....]);
end;
Gracias
Responder Con Cita