demo2main.dfm

在Internet传播声音的源程序

object fmMain: TfmMain
  Left = 192
  Top = 107
  Width = 696
  Height = 480
  Caption = 'fmMain'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object ACMC: TACMConvertor
    InputBufferSize = 2048
    Left = 80
    Top = 16
    ACMFormatIn = {
      8100000001000100401F0000803E000002001000810000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000}
    ACMFormatOut = {
      8100000055000100401F0000D0070000010000000C0001000200000090000100
      7105000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000}
  end
  object ACMI: TACMIn
    BufferSize = 8192
    NumBuffers = 4
    OnBufferFull = ACMIBufferFull
    Left = 128
    Top = 16
  end
  object SSocket: TServerSocket
    Active = True
    Port = 6565
    ServerType = stNonBlocking
    OnClientConnect = SSocketClientConnect
    OnClientDisconnect = SSocketClientDisconnect
    OnClientError = SSocketClientError
    Left = 32
    Top = 16
  end
end