pas_client.dfm

限制客户机运行程序 (有关机等功能)

object F_Client: TF_Client
  Left = 765
  Top = 675
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #24658#21147#21512#25511#21046#31649#29702#31995#32479
  ClientHeight = 29
  ClientWidth = 252
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnPaint = FormPaint
  PixelsPerInch = 96
  TextHeight = 13
  object ListBox1: TListBox
    Left = 138
    Top = 1
    Width = 121
    Height = 21
    ItemHeight = 13
    TabOrder = 0
    Visible = False
  end
  object ListBox2: TListBox
    Left = 136
    Top = 0
    Width = 121
    Height = 18
    ItemHeight = 13
    TabOrder = 1
    Visible = False
  end
  object C_Timer1: TTimer
    Interval = 500
    OnTimer = C_Timer1Timer
    Left = 32
  end
  object C_Socket: TClientSocket
    Active = False
    Address = '127.0.0.1'
    ClientType = ctNonBlocking
    Port = 9000
    OnConnect = C_SocketConnect
    OnDisconnect = C_SocketDisconnect
    OnRead = C_SocketRead
    OnError = C_SocketError
  end
  object C_Timer2: TTimer
    Enabled = False
    Interval = 10000
    OnTimer = C_Timer2Timer
    Left = 64
  end
  object C_Timer4: TTimer
    Interval = 50000
    OnTimer = C_Timer4Timer
    Left = 96
  end
end