unit1.dfm

投名状 脱机登入源码 游戏更新 delphi开发 想搞脱机登入的可以

object Form1: TForm1
  Left = 265
  Top = 123
  Caption = 'Form1'
  ClientHeight = 436
  ClientWidth = 710
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object grp1: TGroupBox
    Left = 11
    Top = 15
    Width = 358
    Height = 401
    Caption = #23494#30721#34920
    TabOrder = 0
    object mmo1: TMemo
      Left = 6
      Top = 11
      Width = 337
      Height = 352
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ScrollBars = ssVertical
      TabOrder = 0
    end
    object btn1: TButton
      Left = 237
      Top = 368
      Width = 101
      Height = 25
      Caption = #33719#21462#23494#30721#34920
      TabOrder = 1
      OnClick = btn1Click
    end
  end
  object grp2: TGroupBox
    Left = 375
    Top = 15
    Width = 322
    Height = 396
    Caption = #30331#38470#21306
    TabOrder = 1
    object lbl4: TLabel
      Left = 247
      Top = 17
      Width = 60
      Height = 13
      Caption = #30331#38470#20449#24687#65306
    end
    object mmoLoginInfo: TMemo
      Left = 3
      Top = 11
      Width = 303
      Height = 356
      Color = clBlack
      Font.Charset = GB2312_CHARSET
      Font.Color = clLime
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object btn3: TButton
      Left = 53
      Top = 368
      Width = 102
      Height = 25
      Caption = #36830#25509#26381#21153#22120
      TabOrder = 1
      OnClick = btn3Click
    end
    object btn5: TButton
      Left = 197
      Top = 368
      Width = 100
      Height = 25
      Caption = #26029#24320#36830#25509
      TabOrder = 2
      OnClick = btn5Click
    end
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 417
    Width = 710
    Height = 19
    Panels = <
      item
        Width = 400
      end
      item
        Width = 50
      end>
    ExplicitTop = 496
    ExplicitWidth = 957
  end
  object clntsckt1: TClientSocket
    Active = False
    ClientType = ctNonBlocking
    Host = '121.207.253.20'
    Port = 9959
    OnConnecting = clntsckt1Connecting
    OnConnect = clntsckt1Connect
    OnDisconnect = clntsckt1Disconnect
    OnRead = clntsckt1Read
    OnError = clntsckt1Error
    Left = 94
    Top = 385
  end
  object clntsckt2: TClientSocket
    Active = True
    ClientType = ctNonBlocking
    Host = '121.207.253.179'
    Port = 5816
    OnRead = clntsckt2Read
    Left = 27
    Top = 384
  end
end