uservermain.~dfm

采用ACM与Skype4Com并且采用分布式UDP来进行语音的拨号、分传。

object frmMain: TfrmMain
  Left = 11
  Top = 103
  BorderStyle = bsDialog
  Caption = #26381#21153#22120#20449#24687
  ClientHeight = 513
  ClientWidth = 989
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object spl1: TSplitter
    Left = 185
    Top = 0
    Height = 487
  end
  object grp1: TGroupBox
    Left = 0
    Top = 0
    Width = 185
    Height = 487
    Align = alLeft
    Caption = #36830#25509#29992#25143':'
    TabOrder = 0
    object skyp1: TSkype
      Left = 41
      Top = 200
      Width = 32
      Height = 32
      OnCallStatus = skyp1CallStatus
      ControlData = {10070000D8130000D8130000}
    end
    object fctrvwMain: TfcTreeView
      Left = 2
      Top = 15
      Width = 181
      Height = 470
      Align = alClient
      Indent = 19
      Items.StreamVersion = 1
      Items.Data = {00000000}
      TabOrder = 1
    end
  end
  object stat1: TStatusBar
    Left = 0
    Top = 487
    Width = 989
    Height = 26
    Panels = <>
  end
  object grp2: TGroupBox
    Left = 188
    Top = 0
    Width = 801
    Height = 487
    Align = alClient
    TabOrder = 1
    object pgc1: TPageControl
      Left = 2
      Top = 15
      Width = 797
      Height = 470
      ActivePage = ts5
      Align = alClient
      TabOrder = 0
      object ts1: TTabSheet
        Caption = #23458#25143#31471#35831#27714#38431#21015
        object strngrdAll: TStringGrid
          Left = 0
          Top = 0
          Width = 789
          Height = 442
          Align = alClient
          Ctl3D = False
          FixedColor = clGradientActiveCaption
          FixedCols = 0
          ParentCtl3D = False
          TabOrder = 0
          ColWidths = (
            63
            64
            64
            64
            64)
        end
      end
      object ts2: TTabSheet
        Caption = #29992#25143#21015#34920
        ImageIndex = 2
        object fcTreeView1: TfcTreeView
          Left = 0
          Top = 0
          Width = 789
          Height = 442
          Align = alClient
          Indent = 19
          Items.StreamVersion = 1
          Items.Data = {00000000}
          TabOrder = 0
        end
      end
      object ts3: TTabSheet
        Caption = #26381#21153#22120#30456#20851#37197#32622
        ImageIndex = 3
        object grp3: TGroupBox
          Left = 0
          Top = 0
          Width = 789
          Height = 273
          Align = alTop
          TabOrder = 0
          object lbl9: TLabel
            Left = 20
            Top = 18
            Width = 46
            Height = 13
            Caption = #37319#26679#29575':'
          end
          object lbl10: TLabel
            Left = 233
            Top = 20
            Width = 59
            Height = 13
            Caption = #22768#38899#26684#24335':'
          end
          object lbl11: TLabel
            Left = 7
            Top = 52
            Width = 59
            Height = 13
            Caption = #20256#36755#26041#24335':'
          end
          object lbl14: TLabel
            Left = 220
            Top = 52
            Width = 72
            Height = 13
            Caption = #22768#21345#35774#22791#25968':'
          end
          object lbl15: TLabel
            Left = 430
            Top = 49
            Width = 85
            Height = 13
            Caption = #26412#22320#21327#35758#31471#21475':'
          end
          object lbl16: TLabel
            Left = 622
            Top = 22
            Width = 85
            Height = 13
            Caption = #36828#31471#21327#35758#31471#21475':'
          end
          object lbl17: TLabel
            Left = 469
            Top = 20
            Width = 46
            Height = 13
            Caption = #27969#27169#24335':'
          end
          object lbl34: TLabel
            Left = 12
            Top = 124
            Width = 59
            Height = 13
            Caption = #22238#25918#35774#22791':'
          end
          object lbl35: TLabel
            Left = 264
            Top = 126
            Width = 59
            Height = 13
            Caption = #24405#38899#35774#22791':'
          end
          object lbl36: TLabel
            Left = 482
            Top = 126
            Width = 59
            Height = 13
            Caption = #26412#22320#31471#21475':'
          end
          object lbl37: TLabel
            Left = 612
            Top = 124
            Width = 59
            Height = 13
            Caption = #36828#31471#31471#21475':'
          end
          object cbbRateType: TComboBox
            Left = 68
            Top = 14
            Width = 145
            Height = 21
            ItemHeight = 13
            ItemIndex = 0
            TabOrder = 0
            Text = '8000'
            Items.Strings = (
              '8000'
              '11025'
              '16000'
              '22050'
              '32000'
              '44100')
          end
          object cbbStreamType: TComboBox
            Left = 296
            Top = 16
            Width = 145
            Height = 21
            ItemHeight = 13
            TabOrder = 1
            Text = '1 (PCM)'
            Items.Strings = (
              '1 (PCM)'
              '2 (ADPCM)'
              '6 (A-Law)'
              '7 (u-Law)'
              '49 (GSM)'
              '85 (MP3)')
          end
          object cbbTransType: TComboBox
            Left = 68
            Top = 50
            Width = 145
            Height = 21
            ItemHeight = 13
            ItemIndex = 0
            TabOrder = 2
            Text = 'UDP'
            Items.Strings = (
              'UDP'
              'TCP')
          end
          object edtSoundDevNum: TEdit
            Left = 296
            Top = 46
            Width = 121
            Height = 21
            TabOrder = 3
            Text = '4'
          end
          object edtLocalWordPort: TEdit
            Left = 516
            Top = 46
            Width = 49
            Height = 21
            TabOrder = 4
            Text = '2333'
          end
          object edtRemoteWordPort: TEdit
            Left = 708
            Top = 18
            Width = 49
            Height = 21
            TabOrder = 5
            Text = '3333'
          end
          object btnSound: TButton
            Left = 718
            Top = 48
            Width = 59
            Height = 25
            Caption = #26356#25913#38899#36136
            TabOrder = 6
            OnClick = btnSoundClick
          end
          object cbbStreamModel: TComboBox
            Left = 516
            Top = 16
            Width = 81
            Height = 21
            ItemHeight = 13