home *** CD-ROM | disk | FTP | other *** search
- object DCCVoice: TDCCVoice
- Left = 376
- Top = 364
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- ActiveControl = Incoming
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = 'TDCC Voice'
- ClientHeight = 159
- ClientWidth = 355
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsMDIChild
- Icon.Data = {<image000.ico>}
- Position = poDefault
- Visible = True
- OnActivate = FormActivate
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 16
- object Incoming: TPanel
- Left = 4
- Top = 4
- Width = 349
- Height = 25
- BevelOuter = bvLowered
- Caption = 'No incoming audio'
- TabOrder = 0
- end
- object Outgoing: TPanel
- Left = 4
- Top = 32
- Width = 349
- Height = 25
- BevelOuter = bvLowered
- Caption = 'No outgoing audio'
- TabOrder = 1
- end
- object Talk: TPanel
- Left = 4
- Top = 64
- Width = 349
- Height = 41
- BevelWidth = 2
- Enabled = False
- Caption = 'Push to talk'
- Color = 16769248
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clGray
- Font.Height = -17
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- OnClick = TalkClick
- OnMouseDown = TalkMouseDown
- OnMouseUp = TalkMouseUp
- end
- object StatusBar: TStatusBar
- Left = 0
- Top = 135
- Width = 355
- Height = 24
- Panels = <
- item
- Text = 'Not connected'
- Width = 260
- end
- item
- Text = 'No audio'
- Width = 50
- end>
- SimplePanel = False
- SimpleText = 'Not connected.'
- SizeGrip = False
- end
- object pbClose: TNashButton
- Left = 276
- Top = 108
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Close'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = pbCloseClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
- 33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
- 993337777F777F3377F3393999707333993337F77737333337FF993399933333
- 399377F3777FF333377F993339903333399377F33737FF33377F993333707333
- 399377F333377FF3377F993333101933399377F333777FFF377F993333000993
- 399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
- 99333773FF777F777733339993707339933333773FF7FFF77333333999999999
- 3333333777333777333333333999993333333333377777333333}
- NumGlyphs = 2
- HoverFont.Charset = DEFAULT_CHARSET
- HoverFont.Color = clRed
- HoverFont.Height = -13
- HoverFont.Name = 'MS Sans Serif'
- HoverFont.Style = [fsUnderline]
- HoverHighlight = True
- end
- object Lock: TPanel
- Left = 300
- Top = 64
- Width = 53
- Height = 21
- BevelWidth = 2
- Enabled = False
- Caption = 'Lock'
- Color = 12105983
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clGray
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- OnClick = LockClick
- end
- object WaveIn: TWaveIn
- OnWaveInData = WaveInWaveInData
- OnWaveInClose = WaveInWaveInClose
- BeforeOpen = WaveInBeforeOpen
- Samples = 8000
- Stereo = False
- WaveBufSize = 195
- BitsPerSample = Bps8
- Left = 8
- Top = 68
- end
- end
-