mainunit.~dfm

序采用网上介绍的方法实现最基本的P2P方式通讯.模拟实现即时消息互发. 2.P2P通讯说明: 1).网关类型是在理想状态下.即非对称型NAT. 2).同在一个内网的两个CLIENT端通讯时,

    end
    object Button1: TButton
      Left = 408
      Top = 88
      Width = 75
      Height = 25
      Caption = #28165#38500#20449#24687
      TabOrder = 7
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 400
      Top = 3
      Width = 75
      Height = 25
      Caption = #20851' '#20110
      TabOrder = 8
      OnClick = Button2Click
    end
  end
  object UDPClient: TIdUDPServer
    Bindings = <>
    DefaultPort = 0
    OnUDPRead = UDPClientUDPRead
    Left = 120
    Top = 73
  end
  object SkinData1: TSkinData
    Active = True
    DisableTag = 99
    SkinControls = [xcMainMenu, xcPopupMenu, xcToolbar, xcControlbar, xcCombo, xcCheckBox, xcRadioButton, xcProgress, xcScrollbar, xcEdit, xcButton, xcBitBtn, xcSpeedButton, xcPanel, xcGroupBox, xcStatusBar, xcTab, xcSystemMenu]
    Skin3rd.Strings = (
      'TTBDock=Panel'
      'TTBToolbar=Panel'
      'TImageEnMView=scrollbar'
      'TImageEnView=scrollbar'
      'TRzButton=button'
      'TRzCheckGroup=CheckGroup'
      'TRzRadioGroup=Radiogroup'
      'TRzRadioButton=Radiobutton'
      'TRzCheckBox=Checkbox'
      'TRzButtonEdit=Edit'
      'TRzDBRadioGroup=Radiogroup'
      'TRzDBRadioButton=Radiobutton'
      'TRzDBCheckBox=Checkbox'
      'TDBCheckboxEh=Checkbox'
      'TDBCheckboxEh=Checkbox'
      'TLMDCHECKBOX=Checkbox'
      'TLMDDBCHECKBOX=Checkbox'
      'TLMDRadiobutton=Radiobutton'
      'TLMDGROUPBOX=Panel'
      'TLMDSIMPLEPANEL=Panel'
      'TLMDDBCalendar=Panel'
      'TLMDButtonPanel=Panel'
      'TLMDLMDCalculator=Panel'
      'TLMDHeaderPanel=Panel'
      'TLMDTechnicalLine=Panel'
      'TLMDLMDClock=Panel'
      'TLMDTrackbar=trackbar'
      'TLMDListCombobox=combobox'
      'TLMDCheckListCombobox=combobox'
      'TLMDHeaderListCombobox=combobox'
      'TLMDImageCombobox=combobox'
      'TLMDColorCombobox=combobox'
      'TLMDFontCombobox=combobox'
      'TLMDFontSizeCombobox=combobox'
      'TLMDFontSizeCombobox=combobox'
      'TLMDPrinterCombobox=combobox'
      'TLMDDriveCombobox=combobox'
      'TLMDCalculatorComboBox=combobox'
      'TLMDTrackBarComboBox=combobox'
      'TLMDCalendarComboBox=combobox'
      'TLMDRADIOGROUP=radiogroup'
      'TLMDCheckGroup=CheckGroup'
      'TLMDDBRADIOGROUP=radiogroup'
      'TLMDDBCheckGroup=CheckGroup'
      'TLMDEDIT=Edit'
      'TLMDMASKEDIT=Edit'
      'TLMDBROWSEEDIT=Edit'
      'TLMDEXTSPINEDIT=Edit'
      'TLMDCALENDAREDIT=Edit'
      'TLMDFILEOPENEDIT=Edit'
      'TLMDFILESAVEEDIT=Edit'
      'TLMDCOLOREDIT=Edit'
      'TLMDDBEDIT=Edit'
      'TLMDDBMASKEDIT=Edit'
      'TLMDDBEXTSPINEDIT=Edit'
      'TLMDDBSPINEDIT=Edit'
      'TLMDDBEDITDBLookup=Edit'
      'TLMDEDITDBLookup=Edit'
      'TDBLookupCombobox=Combobox'
      'TWWDBCombobox=Combobox'
      'TWWDBLookupCombo=Combobox'
      'TWWDBCombobox=Combobox'
      'TWWKeyCombo=Combobox'
      'TWWTempKeyCombo=combobox'
      'TWWDBDateTimePicker=Combobox'
      'TWWRADIOGROUP=radiogroup'
      'TDXDBPICKEDIT=Combobox'
      'TDXDBCALCEDIT=Combobox'
      'TDXDBIMAGEEDIT=Combobox'
      'TDXDBPOPUPEDIT=Combobox'
      'TDXDBEXTLOOKUPEDIT=Combobox'
      'TDXDBLOOKUPEDIT=Combobox'
      'TDXDBDATEEDIT=Combobox'
      'TDXDATEEDIT=Combobox'
      'TDXPICKEDIT=Combobox'
      'TDXPOPUPEDIT=Combobox'
      'TDXDBCURRENCYEDIT=Edit'
      'TDXDBEDIT=Edit'
      'TDXDBMASKEDIT=Edit'
      'TDXDBHYPERLINKEDIT=Edit'
      'TDXEDIT=Edit'
      'TDXMASKEDIT=Edit'
      'TWWDBEDIT=Edit'
      'TDXBUTTONEDIT=Edit'
      'TDXCURRENCYEDIT=Edit'
      'TDXHYPERLINKEDIT=Edit'
      'TOVCPICTUREFIELD=Edit'
      'TOVCDBPICTUREFIELD=Edit'
      'TOVCSLIDEREDIT=Edit'
      'TOVCDBSLIDEREDIT=Edit'
      'TOVCSIMPLEFIELD=Edit'
      'TOVCDBSIMPLEFIELD=Edit'
      'TO32DBFLEXEDIT=Edit'
      'TOVCNUMERICFIELD=Edit'
      'TOVCDBNUMERICFIELD=Edit')
    SkinStore = '(Good)'
    SkinFormtype = sfMainform
    Version = '2.62.5.26'
    MenuUpdate = True
    Left = 456
    Top = 32
    SkinStream = {
      EB440000EA780400D676B1986418EC180C77DD3B8E63007EEFC00FC7D7F2FF7B
      7F36C01FBFE6EAE6C6BB3396930954AFB09B3A6E042B7136D29CC84ECFEBF3FA
      59C294687EADEC446D97BFEF6625EA45BA24A6ADE29989C727C1B8B0FE13D4A6
      C416E0ABF90C4EAEF7FD9578ED4B140CE06E54561F045C3E5547925573ABA7E1
      27C0D5EB36CA6CD033174083D3F2C24C2B244D242888E01544AB990C1D6E3449
      4D9AEA7485A22D56CB0128C5A16A399ACA110E487D009A661A60A00B82500FAE
      5693C02D322DF512CA4929F316F9858E2AAD5208916163593726FFF0866D759A
      F7097ED355431186257E7147FFA2D7F7EF487C8F29090EE57093947325CAD365
      016B18905EB2ADF485F8233B6C23F446037579118FA17A72E2427608378059A0
      196A15F806D3002BCF30D87AB410FD607CC0BF08B6BB4AF03893AEC173F8D2A8
      2BB83DC3E00CC3E80D75F126B8FC8F980CE0B9A11F0CD6BE5503FDD69621DEDA
      E06B01F3C01A78019F8B3A4C9EC00CDC00E09903BE3407D989B00D993042EA8A
      61FAC005B5E0028600B200698014C0038CF005C006A007500760007084013002
      A005A00AE007F784005A6400CC01C003900778012D6177B8A05092801950E0C7
      801E008802400AE003CE2A277281DC006B515BCC13004C0140054017C006EA1F
      208D000BF0B9638D8017005C017006C00389F6940D050FE0019006401A001B00
      0E2A005002801801D000CD983801C00E00700178004580040020010006C00D02
      40120090048039600CF125C04264C6801400A00500310004C98D002801400B00
      400095C23EF823FDB005802C01600880007300CB00FB56B005802C016008A00B
      E1DD762820000000000800580113E79B50D50800800800800E0044FCDF8B2002
      002002001E00ACF9BC14800800800800D800E7CDF682002002002003A009DF37
      EBC800800800800800C00C00C01FD803B8C00C00C00C00C00C00C00C00950017
      AE0C00C00C01000BA00E94004004004003C0055E27F12002002002001B0028E2
      7EFE002002002000C690B04CE389FB48008008008004867DA680074789F8C800
      80080080074001713C6A1F800800800800430042700380380380298007F80E00
      E00E00E00A50041F80380380380370020DC01C01C01C01B800D7125A058E4C78
      0380380380038007263C01C01C01C00780143E00741701E00E00E00E0008015E
      F801E206B7C01C01C01C00200040F648023803803803801700127CC6D42B5C01
      C01C01C01F85B787831ADFF37D4F80380000000D5AEDDEE0FA6FF9BEA4000000
      000019803CFCDF5100000000000D000DFCDF5000000000000000000000005400
      2A80000000000790061B06EA0ACD80115D01C4BA0784BA0771FA03FB3221B05E
      E8FD0FA0000B1000002F60EB198FAEA0000000086C003270000022964FE8F3CA
      BB4318D0B6D7CA18D053E431C61EFD91EF78540B016985C0580B01602D760B4D
      4FF48AC893F12964778D5982FB68BFDB76C0B77BBE26C17C943C6B417B725370
      5F5B600700BF909710FD2D801E82EAE1C5F05FF779F007A0BF7F02402D3F0324
      169F4E940BAF817517DBA25624EFC16B96F7D8D60DBCE87AE42FF814D25F4C6E
      00C37663F5D2D5D4C9DCC440580B01602DDF05A4A7F4FCB40BFFBABF7EB902F0
      B27BF4B3FFDDBC0CEF4D02FFCDFFBF5C847FF3FB80B17E420B17E420B27E440B
      D4840191266FCB324CC0040B1208008164FC800B37E402DCFD8B082CFC8F1127
      2FD4649CBF5245C7A87A4BC9F90D61EB7EA7D92317EB7B326776FAEB90AC0FFC
      CEEA0004A9780080146700060096DDC003002EDC00200079E001400E17005000
      5478029002EDC015803FD8090BDF7E00B001CC38400AE7005E00703803000788
      7180273B9C01000197C0180006C5780216AFC01EC3FD87FB0FF61FEC3F803D87
      FB0FF61FEC3FD87F007B0FF61FEC3FD87FB0FE00F61E587A3034B8B7F39D69C5
      5B6A203B7E2AE62887E9E2AC7BAC000000000000000000040080100200400801
      0020040080100200400801002004008010020040080100200400801002004008
      0100200400801002004008010020040080100200400801002004008020040080
      1002004008010020040080100200400801002004008010020040080100200400
      8010020040080100200400801002004008010020040080100200400801002004
      0080100200400801002004008010020040080100200400801002004008010020
      0400801002004008010020040080100200400801002004008010020040080100
      2004008010020040080100200400801002004008010020040080100200400801
      0020040080100200400801002004008010020040080100200400C0180300600C
      0180300600C0180300600C0180300600C0180300600C0180300600C018030060
      0C0180300600C0180300600C0180300600C0180300600C0180300600C0180300
      600C0180300600C0180300600C0180300600C0180300600C0180300600C01803
      00600C0180300600C0180300600C0180300600C0180300600C0180300600C018
      0300600C0180300600C0180300600C0180300600C0180300600C018000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000336003D7EAB929BA5000F9F00715E81ED4E81F3BF4079FDA2F405E9
      3F03FE40186EDEF0040100401005E7002D88006C5BA0A6FA900321803A5187C2
      88001459100BD7501F4D682FCB6FC66E7E56580128016D688E47655228851000
      28AFB94556DE28AE620BF4DBEFEE7FF6A2C009400C071BDDB2A9E94505002500
      3DC510EDF8D051157E2A8CB6F1454230B8EDBE99E2675F20027802BE45DEC6ED
      BFA517B0004F00491443B6768288AF6D5465B78A2F6985C86DF55B53FA584006
      900796DFD28BDF00348026CA21DBC2414454D15465B78A293B0B98DBFB43F520
      06D005F396375D9B7F4A2E3801BC01A0510EDF520A22B80AA32DBC516ED85CC6
      DFD75EF81EC623C07E675DD9B7F4A2E2001CC01B8510ED88414457A15465B78A
      2F3B0BC4DBFAEBEA9003980272C1D85ECDBFA5161801E001C8510ED944144543
      AA8C36F1450CC2F336FADFBF74DEF80C007B8015B240E6386DFC28BCD003C003
      BCA21DB928288A9255186DE28A4585E96DFCA1F9B801FC0158F45EF5C36FE945
      DF3600083007E9443B7510511590AA30DBC515FB0BD2DBE724697BD5C00FC009
      C9CA6F3E1B7F4A294801F80100A21DBBA8288AD055186DE28B3D85ED6DFDA1FA
      8801FC0143CC6C786DFD28AA600400086510EDE4414456E2A8C36F145B2C2F6B
      6FE7D905E9AF11D532DAFDDB7F0A21DDB611C328876FD20A22B8CA2C36F145C4
      82F06DF6B7E96D0B54FA88EA2DBFD6B7553D28951D1023B6510EDFB414457C14
      586DE28BDD05E0DBEAFC0994B6697023B09B26D7DD54F4A269BB24476CA21DB0
      905115F25161B78A2F8417D36F9EBE7B527A29AA23A1390F5CDD54F4A2789DB0
      23BE510ED848288AFF28B0DBC51404178A77F2400FE0092BFA2D3D53BFAF001F
      C017CA21DB650511504A2E677C456CE82F9CDFD3DA57E1B1003F80222ABFD1E7
      37FC28B9F2C8011C00D0510EDB28288AAA516337E28A020BE7D8FA7758F9B880
      05400A1372F3EE7CC9E14564005400D0510EDB88288AAE5163D8F1455905F2DB
      E7B7D8A6F9E03001680088DA26D9EDB7F0A2A6002A006928876DC414455A28B0
      DBC5158417DB6FF17D2966A0054009B9E0B3AEDB7F0A2F0801580351443B7320
      A22AD14586DE28AC20BF1B7CBAADA4A000158039C46EDB7F0A2F000158037944
      3B7320A22B294586DE28AC20BF1B7FFF54BF88BE811CD145EEFDB6FE14400750
      0379443B482801DA0B86DE21F22A8F9BAF003F1006375E000A2000510A200286
      5153A4D969B61A7D00349C01CCF807857C03EB3C01DEE9997A0BCB293B80FE60
      07F000105802D80065800CC64CE81D47FE00306FE41370F1D109B08AE4136636
      E740E4E5DE00C207904DC40F7A26C2079C4DDA6EB71374DBF1DAC6D207DD5ADF