;right-click the status bar, the "Customize Status Bar..." menu command

object CustomizeStatusBarForm: TCustomizeStatusBarForm
  Caption = 'Barra de estado'
  ClientHeight = 434
  ClientWidth = 261
  object Lbl: TLabel
    Left = 10
    Top = 10
    Width = 241
    Height = 30
    AutoSize = False
    Caption = 'Marque los elementos que le gustaría que se muestren en la barra de estado:'
    Font.Style = [fsBold]
  end
  object ChkLstBx: TCheckListBox
    Left = 10
    Top = 44
    Width = 240
    Height = 340
    OnClickCheck = ChkLstBxClickCheck
  end
end