object Form13: TForm13 Left = 249 Top = 125 BorderStyle = bsToolWindow Caption = ' ' ClientHeight = 109 ClientWidth = 173 Color = 14547961 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnClose = FormClose PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 16 Top = 40 Width = 139 Height = 27 Caption = 'New Messages!' Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Comic Sans MS' Font.Style = [fsBold] ParentFont = False Visible = False end object Gauge1: TGauge Left = 16 Top = 8 Width = 137 Height = 33 ShowText = False Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ForeColor = clRed ParentFont = False Progress = 0 end object CheckBox1: TCheckBox Left = 8 Top = 80 Width = 73 Height = 17 Caption = 'Alert' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = CheckBox1Click end object CheckBox2: TCheckBox Left = 72 Top = 80 Width = 97 Height = 17 Caption = 'New Msgs' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = CheckBox2Click end object Timer1: TTimer Enabled = False Interval = 100 OnTimer = Timer1Timer Left = 264 Top = 8 end end