VmsCommServer/SRC/LIB/FrmNetworkF.dfm

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