Hola de nuevo lucasart.
Me parece que me apuré a alegrarme, quedaba tan sencillo ajustando la propiedad Visible...
Despues de tanta prueba olvidé poner como MDIChild a Form2, fué por eso que no me dío error. Pero no se puede ocultar un Form MDIChild.
Esto no funciona:
Código Delphi
[-]
with Form2 do
begin
Visible:= False;
f_id_Ajuste:= Num;
Visible:= True;
end;
La solución hasta el momento, sigue siendo:
Código Delphi
[-]
procedure TForm2.FormCreate(Sender: TObject);
begin
OnShow:= nil;
end;
class procedure TForm2.Mostrar(Num: Integer);
begin
if not Assigned(Form2) then
Form2:= Create(nil);
with Form2 do
begin
f_id_Ajuste:= Num;
OnShow:= FormShow;
FormShow(nil);
end;
end;
procedure TForm2.FormShow(Sender: TObject);
begin
Caption:= IntToStr(f_id_Ajuste);
end;
Si encontrás alguna otra solución, agradecido si la pones.
Un saludo.