object FrmNetwork: TFrmNetwork Left = 0 Top = 0 Caption = 'TCP Server Monitoring' ClientHeight = 331 ClientWidth = 707 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False OnClose = FormClose OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object reMsg: TMemo Left = 0 Top = 25 Width = 707 Height = 306 Align = alClient Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -12 Font.Name = 'Hack' Font.Style = [] ImeName = 'Microsoft IME 2010' Lines.Strings = ( 'Local mode (Remote mode=0, Local mode=1): %d", status.' 'Module power (normal=0, fault=1): %d", status.' 'Signboard power (off=0, on=1): %d", status.' 'Door (open=0, close=1): %d", status.' 'Fan (off=0, on=1): %d", status.' 'Luminance mode(00:'#51088#46041', 01:'#51452#44036#49688#46041', 02:'#50556#44036#49688#46041'): %d", status.' '') ParentFont = False ReadOnly = True ScrollBars = ssBoth TabOrder = 0 WordWrap = False ExplicitTop = 0 ExplicitHeight = 331 end object Panel1: TPanel Left = 0 Top = 0 Width = 707 Height = 25 Align = alTop BevelOuter = bvNone TabOrder = 1 ExplicitLeft = -106 ExplicitWidth = 813 object Panel2: TPanel Left = 0 Top = 0 Width = 185 Height = 25 Align = alLeft Alignment = taLeftJustify BevelOuter = bvNone Caption = ' '#45348#53944#50892#53356' '#51217#49549' '#47196#44536 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object chkLogPause: TCheckBox Left = 546 Top = 0 Width = 67 Height = 25 Cursor = crHandPoint Hint = 'Log Message Display pause/start' Align = alRight Caption = 'Pause' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 1 ExplicitLeft = 652 end object btnClear: TButton Left = 613 Top = 0 Width = 47 Height = 25 Cursor = crHandPoint Hint = 'Log Message Clear' Align = alRight Caption = 'Clear' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = btnClearClick ExplicitLeft = 719 end object btnCopy: TButton Left = 660 Top = 0 Width = 47 Height = 25 Cursor = crHandPoint Hint = 'Log Message Copy To Clipboard' Align = alRight Caption = 'Copy' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = btnCopyClick ExplicitLeft = 766 end end end