lmain.dfm

来自「FIR引擎最新源码+注册」· DFM 代码 · 共 147 行

object frmLMain: TfrmLMain
  Left = 501
  Top = 274
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #25480#26435#26381#21153#22120
  ClientHeight = 236
  ClientWidth = 461
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu
  OldCreateOrder = False
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBar: TStatusBar
    Left = 0
    Top = 218
    Width = 461
    Height = 18
    Panels = <
      item
        Width = 150
      end
      item
        Width = 75
      end
      item
        Width = 75
      end
      item
        Width = 75
      end
      item
        Width = 75
      end>
  end
  object MemoLog: TMemo
    Left = 0
    Top = 120
    Width = 461
    Height = 98
    Align = alBottom
    Lines.Strings = (
      'MemoLog')
    TabOrder = 1
    OnChange = MemoLogChange
    OnKeyPress = MemoLogKeyPress
  end
  object CheckBoxNoCheck: TCheckBox
    Left = 368
    Top = 0
    Width = 81
    Height = 17
    Caption = #20840#37096#36890#36807
    TabOrder = 2
    OnClick = CheckBoxNoCheckClick
  end
  object MemoIPList: TMemo
    Left = 216
    Top = 8
    Width = 145
    Height = 97
    TabOrder = 3
  end
  object Button1: TButton
    Left = 152
    Top = 80
    Width = 49
    Height = 17
    Caption = 'Load'
    TabOrder = 4
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 384
    Top = 80
    Width = 49
    Height = 17
    Caption = 'Save'
    TabOrder = 5
    OnClick = Button2Click
  end
  object ServerSocket: TServerSocket
    Active = False
    Address = '0.0.0.0'
    Port = 123
    ServerType = stNonBlocking
    OnClientConnect = ServerSocketClientConnect
    OnClientDisconnect = ServerSocketClientDisconnect
    OnClientRead = ServerSocketClientRead
    OnClientError = ServerSocketClientError
    Left = 64
    Top = 48
  end
  object DecodeTime: TTimer
    Interval = 100
    OnTimer = DecodeTimeTimer
    Left = 32
    Top = 48
  end
  object MainMenu: TMainMenu
    Left = 96
    Top = 16
    object MENU_CONTROL: TMenuItem
      Caption = #25511#21046'(&C)'
      object MENU_CONTROL_START: TMenuItem
        Caption = #21551#21160'(&S)'
        OnClick = MENU_CONTROL_STARTClick
      end
      object MENU_CONTROL_STOP: TMenuItem
        Caption = #20572#27490'(&T)'
        OnClick = MENU_CONTROL_STOPClick
      end
      object MENU_CONTROL_EXIT: TMenuItem
        Caption = #36864#20986'(&X)'
        OnClick = MENU_CONTROL_EXITClick
      end
    end
    object V1: TMenuItem
      Caption = #26597#30475'(&V)'
    end
    object MENU_OPTION: TMenuItem
      Caption = #36873#39033'(&O)'
    end
  end
  object StartTimer: TTimer
    Enabled = False
    Interval = 500
    OnTimer = StartTimerTimer
    Left = 32
    Top = 16
  end
  object Timer: TTimer
    Enabled = False
    OnTimer = TimerTimer
    Left = 64
    Top = 16
  end
end