;click the "Writing target" section of the status bar

object TargetForm: TTargetForm
  Caption = 'Objetivo de Escritura'
  ClientHeight = 220
  ClientWidth = 330
  object ChkBx: TCheckBox
    Left = 15
    Top = 15
    Caption = '&Establezca la cantidad de texto objetivo que desea'#13'añadir al documento:'
    Font.Style = [fsBold]
    OnClick = ChkBxClick
  end
  object Edt: TUpDownEdit
    Left = 35
    Top = 65
    SepDigits = 0
  end
  object CmbBx: TComboBox
    Left = 135
    Top = 65
    Width = 180
    Style = csDropDownList
    Items.Strings = (
      'caracteres (sin espacios)'
      'caracteres (con espacios)'
      'palabras')
  end
  object Lbl: TLabel
    Left = 35
    Top = 113
    Width = 280
    Height = 34
    AutoSize = False
    Caption = 'El progreso hacia el objetivo se indicará a través de la sección correspondiente de la barra de estado.'
  end
end