setfrm.dfm

sendudp源代码

object SetPas: TSetPas
  Left = 384
  Top = 255
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Set'
  ClientHeight = 179
  ClientWidth = 229
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 72
    Width = 161
    Height = 13
    AutoSize = False
    Caption = 'WantoHookCaption:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 8
    Top = 120
    Width = 177
    Height = 16
    AutoSize = False
    Caption = 'Infomation Max Count:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 224
    Height = 65
    Caption = 'WS_32.DLL'
    TabOrder = 0
    object CheckBox3: TCheckBox
      Left = 24
      Top = 40
      Width = 65
      Height = 17
      Caption = 'Connect'
      Checked = True
      State = cbChecked
      TabOrder = 0
    end
    object CheckBox4: TCheckBox
      Left = 24
      Top = 16
      Width = 49
      Height = 17
      Caption = 'Send'
      Checked = True
      State = cbChecked
      TabOrder = 1
    end
    object CheckBox5: TCheckBox
      Left = 112
      Top = 16
      Width = 65
      Height = 17
      Caption = 'SendTo'
      Checked = True
      State = cbChecked
      TabOrder = 2
    end
  end
  object Edit1: TEdit
    Left = 8
    Top = 88
    Width = 217
    Height = 21
    TabOrder = 1
    Text = 'counter-strike'
  end
  object Edit2: TEdit
    Left = 184
    Top = 119
    Width = 41
    Height = 21
    TabOrder = 2
    Text = '100'
  end
  object Button1: TButton
    Left = 24
    Top = 144
    Width = 75
    Height = 25
    Caption = 'Confirm'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
  end
  object Button2: TButton
    Left = 128
    Top = 144
    Width = 75
    Height = 25
    Caption = 'Exit'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 4
    OnClick = Button2Click
  end
end