[M.A.D.M.A.N.]

Констрэйнты (constraints) или Алайны (align) не применены к гроупбоксу?
Ибо у меня работает

Код:

  if chk1.Checked then
    grp1.Height := 100
  else
    grp1.Height := 200;

object grp1: TGroupBox
  Left = 24
  Top = 80
  Width = 185
  Height = 105
  Caption = 'grp1'
  TabOrder = 0
end
object chk1: TCheckBox
  Left = 24
  Top = 48
  Width = 97
  Height = 17
  Caption = 'chk1'
  TabOrder = 1
  OnClick = chk1Click
end