Try to set HeaderFont.Height = -1
HeaderFont.Height = -1
This causes the caption area to disappear, at last in Delphi 11.