Maximizar MDIChild

[ecfisa]

Hola ramonibk.

Probá de este modo:

Código Delphi [-]
...
procedure TForm1.TraerFormAlFrente(AName: string);
var
  i: Integer;
begin
  for i:= MDIChildCount-1 downto 0 do
    if MDIChildren[i].Name = AName then
    begin
      if MDIChildren[i].WindowState = wsMinimized then
        MDIChildren[i].WindowState:= wsMaximized;
      MDIChildren[i].BringToFront;
    end;
end;

Ejemplo llamada:

Código Delphi [-]
   TraerFormAlFrente('Form5');

No te dará el error ya que no invocará una ventana no creada (ni la mostrará), pero como bién dice maeyanes, el error sigue estando...

Saludos.