o que  a de errado na procedure      procedure TfrmMatArm01.GrupodeClientes1Click(NAME_1: TObject);
begin
   Screen.Cursor   := crHourGlass;

   try
      frmMatOpe116.BringToFront;
   except
      frmMatOpe116   := TfrmMatOpe116.Create(frmMatArm01);
   end;

   frmMatOpe116.Show;
end; Make sure to only use capital letters in your entire response.
user