mainunit.dfm

《Delphi 7经典问题解析》源代码 第一到七章 基础篇源程序 应用篇源程序

object Form1: TForm1
  Left = 381
  Top = 269
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #21033#29992#27880#20876#34920#36941#21382#33719#21462#26412#26426'IP'#22320#22336#28436#31034
  ClientHeight = 260
  ClientWidth = 311
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 305
    Height = 121
    Caption = 'IP'#22320#22336#33719#21462
    TabOrder = 0
    object Label1: TLabel
      Left = 32
      Top = 24
      Width = 72
      Height = 12
      Caption = #26412#26426'IP'#22320#22336#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Button1: TButton
      Left = 32
      Top = 56
      Width = 225
      Height = 25
      Caption = #36890#36807'API'#20989#25968#33719#21462#26412#26426'IP'#22320#22336'(&A)'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 32
      Top = 88
      Width = 225
      Height = 25
      Caption = #36890#36807#27880#20876#34920#33719#21462#26412#26426'IP'#22320#22336'(&R)'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = Button2Click
    end
    object Edit1: TEdit
      Left = 104
      Top = 19
      Width = 153
      Height = 21
      Enabled = False
      TabOrder = 2
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 128
    Width = 305
    Height = 129
    Caption = 'TCP/IP'#35774#32622
    TabOrder = 1
    object Label2: TLabel
      Left = 8
      Top = 48
      Width = 138
      Height = 12
      Caption = #25351#23450'IP'#22320#22336'(IPAddress)'#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 8
      Top = 72
      Width = 138
      Height = 12
      Caption = #25351#23450#23376#32593#25513#30721'(SubMask)'#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 8
      Top = 96
      Width = 138
      Height = 12
      Caption = #25351#23450#32570#30465#32593#20851'(GateWay)'#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 8
      Top = 24
      Width = 60
      Height = 13
      Caption = #32593#21345#21517#31216#65306
    end
    object Edit2: TEdit
      Left = 152
      Top = 43
      Width = 129
      Height = 21
      TabOrder = 0
    end
    object Edit3: TEdit
      Left = 152
      Top = 67
      Width = 129
      Height = 21
      TabOrder = 1
    end
    object Edit4: TEdit
      Left = 152
      Top = 91
      Width = 129
      Height = 21
      TabOrder = 2
    end
  end
end