www.pudn.com > netcode58.zip > uMain.dfm, change:2004-02-23,size:16668b


object FormMain: TFormMain 
  Left = 209 
  Top = 113 
  ActiveControl = BtCall 
  BorderStyle = bsDialog 
  Caption = #32593#32476'IP'#30005#35805' V1.2 ['#20065#26449#26376#20809#20986#21697']' 
  ClientHeight = 252 
  ClientWidth = 546 
  Color = clSkyBlue 
  Font.Charset = DEFAULT_CHARSET 
  Font.Color = clWindowText 
  Font.Height = -11 
  Font.Name = 'MS Sans Serif' 
  Font.Style = [] 
  OldCreateOrder = False 
  Position = poDesktopCenter 
  OnClose = FormClose 
  OnCreate = FormCreate 
  PixelsPerInch = 96 
  TextHeight = 13 
  object LbMyIP: TLabel 
    Left = 112 
    Top = 16 
    Width = 67 
    Height = 13 
    Caption = #25105#30340'IP: '#26080 
    Color = clSkyBlue 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clRed 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentColor = False 
    ParentFont = False 
  end 
  object LbCaller: TLabel 
    Left = 328 
    Top = 16 
    Width = 67 
    Height = 13 
    Caption = #23545#26041'IP: '#26080 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clFuchsia 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentFont = False 
  end 
  object Label9: TLabel 
    Left = 16 
    Top = 92 
    Width = 52 
    Height = 13 
    Caption = #26412#22320#31471#21475 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clBlue 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentFont = False 
  end 
  object LbDelayTime: TLabel 
    Left = 328 
    Top = 198 
    Width = 67 
    Height = 13 
    Caption = #24310#26102' 0.3'#31186 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clBlue 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentFont = False 
  end 
  object BtOpen: TBitBtn 
    Left = 16 
    Top = 16 
    Width = 75 
    Height = 25 
    Caption = #24320#26426 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clBlue 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 0 
    OnClick = BtOpenClick 
    Glyph.Data = { 
      76010000424D7601000000000000760000002800000020000000100000000100 
      04000000000000010000120B0000120B00001000000000000000000000000000 
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 
      03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB 
      0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB 
      0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 
      0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 
      0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB 
      0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB 
      0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB 
      0333337F777FFFFF7F3333000000000003333377777777777333} 
    NumGlyphs = 2 
  end 
  object BtClose: TBitBtn 
    Left = 16 
    Top = 56 
    Width = 75 
    Height = 25 
    Caption = #20851#26426 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clRed 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 1 
    OnClick = BtCloseClick 
    Glyph.Data = { 
      76010000424D7601000000000000760000002800000020000000100000000100 
      04000000000000010000120B0000120B00001000000000000000000000000000 
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 
      03333377777777777F333301111111110333337F333333337F33330111111111 
      0333337F333333337F333301111111110333337F333333337F33330111111111 
      0333337F333333337F333301111111110333337F333333337F33330111111111 
      0333337F3333333F7F333301111111B10333337F333333737F33330111111111 
      0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11 
      0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11 
      0333337F377777337F333301111111110333337F333333337F33330111111111 
      0333337FFFFFFFFF7F3333000000000003333377777777777333} 
    NumGlyphs = 2 
  end 
  object BtCall: TBitBtn 
    Left = 16 
    Top = 152 
    Width = 75 
    Height = 25 
    Caption = #25320#21495 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clGreen 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 2 
    OnClick = BtCallClick 
    Glyph.Data = { 
      76010000424D7601000000000000760000002800000020000000100000000100 
      04000000000000010000120B0000120B00001000000000000000000000000000 
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003B3000000000 
      003B37F77777777777F73BB09111111110BB3777F3F3F3F3F777311098080808 
      10B33777F7373737377313309999999910337F373F3F3F3F3733133309808089 
      03337F3373737373733313333099999033337FFFF7FFFFF7FFFFB011B0000000 
      BBBB7777777777777777B01110BBBBB0BBBB77F37777777777773011108BB333 
      333337F337377F3FFFF33099111BB3010033373F33777F77773F331999100101 
      11033373FFF77773337F33300099991999033337773FFFF33373333BB7100199 
      113333377377773FF7F333BB333BB7011B33337733377F7777FF3BB3333BB333 
      3BB3377333377F33377FBB33333BB33333BB7733333773333377} 
    NumGlyphs = 2 
  end 
  object Panel1: TPanel 
    Left = 112 
    Top = 64 
    Width = 201 
    Height = 113 
    Alignment = taLeftJustify 
    BevelInner = bvRaised 
    BevelOuter = bvLowered 
    Color = clSkyBlue 
    TabOrder = 3 
    object Label3: TLabel 
      Left = 8 
      Top = 10 
      Width = 26 
      Height = 13 
      Caption = #22320#22336 
      Font.Charset = GB2312_CHARSET 
      Font.Color = clBlack 
      Font.Height = -13 
      Font.Name = #23435#20307 
      Font.Style = [] 
      ParentFont = False 
    end 
    object Label5: TLabel 
      Left = 8 
      Top = 34 
      Width = 26 
      Height = 13 
      Caption = #29992#25143 
      Font.Charset = GB2312_CHARSET 
      Font.Color = clWindowText 
      Font.Height = -13 
      Font.Name = #23435#20307 
      Font.Style = [] 
      ParentFont = False 
    end 
    object Label6: TLabel 
      Left = 8 
      Top = 58 
      Width = 26 
      Height = 13 
      Caption = #23494#30721 
      Font.Charset = GB2312_CHARSET 
      Font.Color = clWindowText 
      Font.Height = -13 
      Font.Name = #23435#20307 
      Font.Style = [] 
      ParentFont = False 
    end 
    object EdSocksUser: TEdit 
      Left = 40 
      Top = 32 
      Width = 153 
      Height = 21 
      TabOrder = 0 
    end 
    object EdSocksPass: TEdit 
      Left = 40 
      Top = 56 
      Width = 153 
      Height = 21 
      PasswordChar = '*' 
      TabOrder = 1 
    end 
    object RbSocks4: TRadioButton 
      Left = 8 
      Top = 88 
      Width = 65 
      Height = 17 
      Caption = 'Socks 4' 
      Checked = True 
      TabOrder = 2 
      TabStop = True 
    end 
    object RbSocks5: TRadioButton 
      Left = 120 
      Top = 88 
      Width = 65 
      Height = 17 
      Caption = 'Socks 5' 
      TabOrder = 3 
    end 
    object EdSocksIP: TComboBox 
      Left = 40 
      Top = 8 
      Width = 153 
      Height = 21 
      ItemHeight = 13 
      TabOrder = 4 
    end 
  end 
  object Panel2: TPanel 
    Left = 328 
    Top = 64 
    Width = 201 
    Height = 89 
    Alignment = taLeftJustify 
    BevelInner = bvRaised 
    BevelOuter = bvLowered 
    Color = clSkyBlue 
    TabOrder = 4 
    object Label1: TLabel 
      Left = 8 
      Top = 10 
      Width = 26 
      Height = 13 
      Caption = #22320#22336 
      Font.Charset = GB2312_CHARSET 
      Font.Color = clWindowText 
      Font.Height = -13 
      Font.Name = #23435#20307 
      Font.Style = [] 
      ParentFont = False 
    end 
    object Label7: TLabel 
      Left = 8 
      Top = 34 
      Width = 26 
      Height = 13 
      Caption = #29992#25143 
      Font.Charset = GB2312_CHARSET 
      Font.Color = clWindowText 
      Font.Height = -13 
      Font.Name = #23435#20307 
      Font.Style = [] 
      ParentFont = False 
    end 
    object Label8: TLabel 
      Left = 8 
      Top = 58 
      Width = 26 
      Height = 13 
      Caption = #23494#30721 
      Font.Charset = GB2312_CHARSET 
      Font.Color = clWindowText 
      Font.Height = -13 
      Font.Name = #23435#20307 
      Font.Style = [] 
      ParentFont = False 
    end 
    object EdHttpUser: TEdit 
      Left = 40 
      Top = 32 
      Width = 153 
      Height = 21 
      TabOrder = 0 
    end 
    object EdHttpPass: TEdit 
      Left = 40 
      Top = 56 
      Width = 153 
      Height = 21 
      TabOrder = 1 
    end 
    object EdHttpIP: TComboBox 
      Left = 40 
      Top = 8 
      Width = 153 
      Height = 21 
      ItemHeight = 13 
      TabOrder = 2 
    end 
  end 
  object CkSocks: TCheckBox 
    Left = 112 
    Top = 40 
    Width = 137 
    Height = 17 
    Caption = 'SOCKS '#20195#29702#26381#21153#22120 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clBlue 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 5 
  end 
  object CkHttp: TCheckBox 
    Left = 328 
    Top = 40 
    Width = 129 
    Height = 17 
    Caption = 'HTTP '#20195#29702#26381#21153#22120 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clBlue 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 6 
  end 
  object EdListenPort: TEdit 
    Left = 16 
    Top = 112 
    Width = 73 
    Height = 21 
    TabOrder = 7 
    Text = '23450' 
  end 
  object StatusBar: TStatusBar 
    Left = 0 
    Top = 232 
    Width = 546 
    Height = 20 
    Color = clSkyBlue 
    Panels = < 
      item 
        Text = #23601#32490 
        Width = 160 
      end 
      item 
        Text = #27809#26377#36830#25509 
        Width = 180 
      end 
      item 
        Text = #25910#21040': 0    '#21457#36865': 0' 
        Width = 50 
      end> 
    SimpleText = 'Ready' 
  end 
  object BtStop: TBitBtn 
    Left = 16 
    Top = 192 
    Width = 75 
    Height = 25 
    Caption = #25346#26426 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clFuchsia 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 9 
    OnClick = BtStopClick 
    Glyph.Data = { 
      76010000424D7601000000000000760000002800000020000000100000000100 
      04000000000000010000120B0000120B00001000000000000000000000000000 
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000 
      003333377777777777F3333091111111103333F7F3F3F3F3F7F3311098080808 
      10333777F737373737F313309999999910337F373F3F3F3F3733133309808089 
      03337FFF7F7373737FFF1000109999901000777777FFFFF77777701110000000 
      111037F337777777F3373099901111109990373F373333373337330999999999 
      99033373FFFFFFFFFF7333310000000001333337777777777733333333333333 
      3333333333333333333333333333333333333333333333333333333333333333 
      3333333333333333333333333333333333333333333333333333333333333333 
      3333333333333333333333333333333333333333333333333333} 
    NumGlyphs = 2 
  end 
  object CkPhone: TCheckBox 
    Left = 328 
    Top = 166 
    Width = 49 
    Height = 17 
    Caption = #35805#31570 
    Checked = True 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clBlue 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentFont = False 
    State = cbChecked 
    TabOrder = 10 
    OnClick = CkPhoneClick 
  end 
  object CkSpeaker: TCheckBox 
    Left = 440 
    Top = 166 
    Width = 49 
    Height = 17 
    Caption = #22768#38899 
    Checked = True 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clBlue 
    Font.Height = -13 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ParentFont = False 
    State = cbChecked 
    TabOrder = 11 
    OnClick = CkSpeakerClick 
  end 
  object SbDelayTime: TScrollBar 
    Left = 112 
    Top = 196 
    Width = 201 
    Height = 15 
    Max = 50 
    Min = 1 
    PageSize = 0 
    Position = 3 
    TabOrder = 12 
    OnChange = SbDelayTimeChange 
  end 
  object BtSaveSetup: TBitBtn 
    Left = 440 
    Top = 192 
    Width = 91 
    Height = 25 
    Caption = #20445#23384#35774#32622 
    Font.Charset = DEFAULT_CHARSET 
    Font.Color = clBlue 
    Font.Height = -13 
    Font.Name = 'MS Sans Serif' 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 13 
    OnClick = BtSaveSetupClick 
    Glyph.Data = { 
      76010000424D7601000000000000760000002800000020000000100000000100 
      04000000000000010000130B0000130B00001000000000000000000000000000 
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070 
      7700333333337777777733333333008088003333333377F73377333333330088 
      88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000 
      000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF 
      FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039 
      99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999 
      99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339 
      99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999 
      93337FFFF7737777733300000033333333337777773333333333} 
    NumGlyphs = 2 
  end 
  object ATimer: TTimer 
    Enabled = False 
    Interval = 2000 
    OnTimer = ATimerTimer 
    Left = 248 
    Top = 8 
  end 
  object TrayIcon: TLMDTrayIcon 
    Hint = #32593#32476'IP'#30005#35805' V1.2' 
    Icon.Data = { 
      0000010001002020040000000000E80200001600000028000000200000004000 
      0000010004000000000000020000000000000000000000000000000000000000 
      0000000080000080000000808000800000008000800080800000C0C0C0008080 
      80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000 
      0000000000000000000000000000000000000000000000000000000000000000 
      0000000000000000000000000000000000000000000000000000000000000000 
      0000000000888800000000000000000000000000887788880000000000000000 
      0000008877778888880000000000000000008877777788888888000000000000 
      0088777777FF888888888800000000000F777777FF7778888888888800000000 
      8F7777FF7777778888888888880080888F77FF77780777788888888888808877 
      8FFF77780FF877778888888888808F778F77780FF87807777888888888808FFF 
      78F77FF8780FF87777888888888008F7778F77780FF87807777788888880008F 
      7778F77FF8780FF77777778888800008F7778F77780FF7777777887788800000 
      8F7778F77FF777777788FF077780000008F7778F7777777788FFFFF088000000 
      008F7778F7777788FFFFFFFF000000000008F77788F788FFFFFFFFFFF0000000 
      000088F77788F8FFFFFFFFFFFF00000000000088F777888FFFFFFFFFFF800000 
      0000000088880008FFFFFFFF8800000000000000000000008FFFFF8800000000 
      000000000000000008FF88000000000000000000000000000088000000000000 
      0000000000000000000000000000000000000000000000000000000000000000 
      000000000000000000000000000000000000000000000000000000000000FFFF 
      FFFFFFFFFFFFFFFFFFFFFFFC3FFFFFF00FFFBFC003FF5F0000FFAC00003FD800 
      000FB0000003400000010000000000000000000000000000000080000000C000 
      0000E0000000F0000001F8000003FC000007FE000003FF000001FFC00000FFF0 
      E003FFFFF00FFFFFF83FFFFFFCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF} 
    NoClose = True 
    PopupMenu = MenuPopup 
    OnDblClick = MnDisplayClick 
    Left = 504 
    Top = 16 
  end 
  object MenuPopup: TLMDPopupMenu 
    OwnerDraw = True 
    Layout.Alignment = agBottomCenter 
    Layout.AlignText2Glyph = taTop 
    Layout.OffsetY = -2 
    Bevel.Mode = bmCustom 
    Caption = 'NetPhone' 
    FillObject.Style = sfGradient 
    FillObject.Gradient.Color = clSkyBlue 
    FillObject.Gradient.ColorCount = 64 
    FillObject.Gradient.EndColor = clMoneyGreen 
    Font.Charset = ANSI_CHARSET 
    Font.Color = clYellow 
    Font.Height = -13 
    Font.Name = 'Times New Roman' 
    Font.Style = [fsBold, fsItalic] 
    FontFX.Angle = 90 
    Left = 464 
    Top = 16 
    object MnDisplay: TMenuItem 
      Caption = '[&D]'#26174#31034 
      OnClick = MnDisplayClick 
    end 
    object MnHide: TMenuItem 
      Caption = '[&H]'#38544#34255 
      OnClick = MnHideClick 
    end 
    object N1: TMenuItem 
      Caption = '-' 
    end 
    object MnExit: TMenuItem 
      Caption = '[&X]'#36864#20986 
      OnClick = MnExitClick 
    end 
  end 
end