www.pudn.com > M2Server.rar > MainForm.dfm

object FormMain: TFormMain 
  Left = 246 
  Top = 208 
  Width = 421 
  Height = 297 
  Caption = 'GameSvr' 
  Color = clBtnFace 
  Font.Charset = DEFAULT_CHARSET 
  Font.Color = clWindowText 
  Font.Height = -11 
  Font.Name = 'MS Sans Serif' 
  Font.Style = [] 
  OldCreateOrder = False 
  Scaled = False 
  OnClose = FormClose 
  OnCloseQuery = FormCloseQuery 
  OnCreate = FormCreate 
  PixelsPerInch = 96 
  TextHeight = 13 
  object Label1: TLabel 
    Left = 32 
    Top = 8 
    Width = 32 
    Height = 13 
    Caption = 'Label1' 
  end 
  object Label2: TLabel 
    Left = 32 
    Top = 24 
    Width = 32 
    Height = 13 
    Caption = 'Label2' 
  end 
  object StatusBar1: TStatusBar 
    Left = 0 
    Top = 244 
    Width = 413 
    Height = 19 
    Panels = < 
      item 
        Width = 100 
      end 
      item 
        Width = 100 
      end 
      item 
        Width = 100 
      end> 
  end 
  object memLogInfo: TMemo 
    Left = 0 
    Top = 48 
    Width = 413 
    Height = 196 
    TabStop = False 
    Align = alBottom 
    ReadOnly = True 
    ScrollBars = ssVertical 
    TabOrder = 1 
  end 
  object TimerConnectServer: TTimer 
    Enabled = False 
    OnTimer = TimerConnectServerTimer 
    Left = 424 
    Top = 176 
  end 
  object ServerSocket1: TServerSocket 
    Active = False 
    Port = 0 
    ServerType = stNonBlocking 
    OnClientConnect = ServerSocket1ClientConnect 
    OnClientRead = ServerSocket1ClientRead 
    OnClientError = ServerSocket1ClientError 
    Left = 80 
    Top = 80 
  end 
  object DecodeTimer: TTimer 
    Interval = 1 
    OnTimer = DecodeTimerTimer 
    Left = 338 
    Top = 176 
  end 
  object ClientSocketDB: TClientSocket 
    Active = False 
    ClientType = ctNonBlocking 
    Port = 0 
    OnConnect = ClientSocketDBConnect 
    OnDisconnect = ClientSocketDBDisconnect 
    OnRead = ClientSocketDBRead 
    OnError = ClientSocketDBError 
    Left = 184 
    Top = 80 
  end 
  object Timer1: TTimer 
    Interval = 50000 
    OnTimer = Timer1Timer 
    Left = 280 
    Top = 176 
  end 
  object ClientSocketID: TClientSocket 
    Active = False 
    ClientType = ctNonBlocking 
    Port = 0 
    OnRead = ClientSocketIDRead 
    OnError = ClientSocketDBError 
    Left = 280 
    Top = 80 
  end 
  object TimerHum: TTimer 
    Interval = 1 
    OnTimer = TimerHumTimer 
    Left = 160 
    Top = 176 
  end 
  object TimerMon: TTimer 
    Enabled = False 
    Interval = 1 
    OnTimer = TimerMonTimer 
    Left = 216 
    Top = 176 
  end 
  object TimerNpc: TTimer 
    Enabled = False 
    Interval = 100 
    OnTimer = TimerNpcTimer 
    Left = 104 
    Top = 176 
  end 
end