object MsgWindow: TMsgWindow Left = 188 Top = 115 AutoScroll = False Caption = 'Messages' ClientHeight = 138 ClientWidth = 435 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PopupMenu = MsgViewPopupMenu OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object CountsPanel: TPanel Left = 0 Top = 114 Width = 435 Height = 24 Align = alBottom BevelInner = bvLowered BevelOuter = bvNone TabOrder = 0 object TBevel Left = 248 Top = 4 Width = 57 Height = 16 end object Bevel2: TBevel Left = 152 Top = 4 Width = 57 Height = 16 end object Bevel5: TBevel Left = 368 Top = 4 Width = 57 Height = 16 end object Label1: TLabel Left = 5 Top = 5 Width = 35 Height = 13 AutoSize = False Caption = 'Errors:' end object Bevel1: TBevel Left = 40 Top = 4 Width = 57 Height = 16 end object ErrorLabel: TLabel Left = 47 Top = 5 Width = 45 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '0' end object Label2: TLabel Left = 101 Top = 5 Width = 48 Height = 13 AutoSize = False Caption = 'Warnings:' end object WarningLabel: TLabel Left = 159 Top = 5 Width = 45 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '0' end object Label7: TLabel Left = 213 Top = 5 Width = 27 Height = 13 AutoSize = False Caption = 'Hints:' end object HintLabel: TLabel Left = 255 Top = 5 Width = 45 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '0' end object Label9: TLabel Left = 309 Top = 5 Width = 59 Height = 13 AutoSize = False Caption = 'Fatal errors:' end object FatalLabel: TLabel Left = 375 Top = 5 Width = 45 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '0' end end object MsgViewPopupMenu: TPopupMenu OnPopup = MsgViewPopup Left = 8 Top = 8 object mvViewSourceItem: TMenuItem Caption = '&View source' HelpContext = 5720 ShortCut = 0 OnClick = ViewSourceItemClick end object mvEditSourceItem: TMenuItem Caption = 'Edit &Source' HelpContext = 5721 ShortCut = 0 OnClick = EditSourceItemClick end object mvAltViewSourceItem: TMenuItem Caption = 'View Source' HelpContext = 5720 ShortCut = 0 Visible = False OnClick = ViewSourceItemClick end object mvAltEditSourceItem: TMenuItem Caption = 'Edit Source' HelpContext = 5721 ShortCut = 0 Visible = False OnClick = EditSourceItemClick end end end