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.