Ver Mensaje Individual
  #3  
Antiguo 30-12-2005
Avatar de dandia28
dandia28 dandia28 is offline
Miembro
 
Registrado: dic 2005
Ubicación: Uruguay
Posts: 39
Reputación: 0
dandia28 Va por buen camino
lo solucione así, lo pongo por las dudas, no es lo mejor del mundo pero...anda

Código Delphi [-]
procedure TDM.MostrarForm(AClass: TFormClass;ATag: integer);
{Parametro "ATAG" de tipo entero: al valor de ATag lo estamos asignando
a la propiedad TAG del nuevo formulario }
begin
     F:=Application.FindComponent(Copy(AClass.ClassName,2,255))as TForm;
     Application.CreateForm(AClass,F);
     with f do
     try
        Tag := ATag;
        ShowModal;
     finally
        Free;
     end;
end;

Última edición por dec fecha: 30-12-2005 a las 17:36:30.
Responder Con Cita