home *** CD-ROM | disk | FTP | other *** search
- object PlayerForm: TPlayerForm
- Left = 495
- Top = 460
- BorderIcons = []
- BorderStyle = bsNone
- Caption = 'PlayerForm'
- ClientHeight = 209
- ClientWidth = 350
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- KeyPreview = True
- OldCreateOrder = True
- PopupMenu = PopupMenu1
- OnCreate = FormCreate
- OnPaint = FormPaint
- OnResize = FormResize
- PixelsPerInch = 120
- TextHeight = 16
- object RecorderPanel: TPanel
- Left = 0
- Top = 181
- Width = 350
- Height = 28
- Align = alBottom
- PopupMenu = PopupMenu1
- TabOrder = 0
- Visible = False
- object OPlay: TSpeedButton
- Left = 0
- Top = 0
- Width = 28
- Height = 28
- Hint = 'Play the original sound associated with the sound component'
- Glyph.Data = {
- 72010000424D7201000000000000760000002800000015000000150000000100
- 040000000000FC00000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777770007777777777777777777770007777777777777777777770007777
- 77777777777777777000777777F77777777777777000777778AFF77777777777
- 7000777778AAAFF7777777777000777778AAAAAFF77777777000777778AAAAAA
- AFF777777000777778AAAAAAAAAFF7777000777778AAAAAAAAA88F7770007777
- 78AAAAAAA88777777000777778AAAAA8877777777000777778AAA88777777777
- 7000777778A88777777777777000777778877777777777777000777777777777
- 7777777770007777777777777777777770007777777777777777777770007777
- 77777777777777777000777777777777777777777000}
- ParentShowHint = False
- ShowHint = True
- OnClick = OPlayClick
- end
- object UPlay: TSpeedButton
- Left = 28
- Top = 0
- Width = 28
- Height = 28
- Hint =
- 'Play the sound recorded by the user (for comparison with the ori' +
- 'ginal sound)'
- Glyph.Data = {
- 72010000424D7201000000000000760000002800000015000000150000000100
- 040000000000FC00000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777770007777777777777777777770007777777777777777777770007777
- 77777777777777777000777777F77777777777777000777778CFF77777777777
- 7000777778CCCFF7777777777000777778CCCCCFF77777777000777778CCCCCC
- CFF777777000777778CCCCCCCCCFF7777000777778CCCCCCCCC88F7770007777
- 78CCCCCCC88777777000777778CCCCC8877777777000777778CCC88777777777
- 7000777778C88777777777777000777778877777777777777000777777777777
- 7777777770007777777777777777777770007777777777777777777770007777
- 77777777777777777000777777777777777777777000}
- ParentShowHint = False
- ShowHint = True
- OnClick = UPlayClick
- end
- object URecord: TSpeedButton
- Left = 56
- Top = 0
- Width = 28
- Height = 28
- Hint = 'Record sound for comparison with the original recording'
- AllowAllUp = True
- GroupIndex = 1
- Glyph.Data = {
- 72010000424D7201000000000000760000002800000015000000150000000100
- 040000000000FC00000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777077
- 7700000770007777777778070077770770007777777777000777770770007777
- 77777777777770777000777777777777777007777000777777777777770B0777
- 7000777777777777000077777000777777777770BB077777700077777777770B
- B007777770007777777770BB007777777000777777770BB00777777770007777
- 7770BB007777777770007777770BB007777777777000777000BB007777777777
- 70007700A0000777777777777000700A6600777777777777700000A666607777
- 7777777770000A66660077777777777770000006600777777777777770007706
- 00777777777777777000770007777777777777777000}
- ParentShowHint = False
- ShowHint = True
- OnClick = URecordClick
- end
- object UCancel: TSpeedButton
- Left = 84
- Top = 0
- Width = 29
- Height = 28
- Hint = 'Delete recorded file (if any)'
- Glyph.Data = {
- 72010000424D7201000000000000760000002800000015000000150000000100
- 040000000000FC00000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
- FFFFFFFFF000FFFFFFFFFFFFFFFFFFFFF000FFFFFFFFFFF0000FFFFFF000FFFF
- FFFFF0077880FFFFF000FFFFFFF007777880FFFFF000FFFFF00772777880FFFF
- F000FFFFF877222278880FFFF000FFFFF872727278880FFFF000FFFF87727777
- 78880FFFF000FFFF8722272278880FFFF000FFFF87727722788880FFF000FFFF
- 877722FFFF8880FFF000FFF87777FF8888FF80FFF000FFF877FF88F8FF8FF0FF
- F000FFF8FF88FFF8FF888FFFF000FFF888FFFF8FFF8FFFFFF000FFFFF88FF8FF
- 88FFFFFFF000FFFFFFF88F88FFFFFFFFF000FFFFFFFFFFFFFFFFFFFFF000FFFF
- FFFFFFFFFFFFFFFFF000FFFFFFFFFFFFFFFFFFFFF000}
- ParentShowHint = False
- ShowHint = True
- OnClick = UCancelClick
- end
- end
- object Memo1: TMemo
- Left = 0
- Top = 0
- Width = 350
- Height = 151
- Align = alClient
- BorderStyle = bsNone
- Color = clWhite
- TabOrder = 1
- end
- object PlayerPanel: TPanel
- Left = 0
- Top = 151
- Width = 350
- Height = 30
- Align = alBottom
- Caption = 'File not found'
- PopupMenu = PopupMenu1
- TabOrder = 2
- object MediaPlayer1: TMediaPlayer
- Left = 0
- Top = 0
- Width = 253
- Height = 30
- PopupMenu = PopupMenu1
- TabOrder = 0
- OnClick = MediaPlayer1Click
- end
- end
- object PopupMenu1: TPopupMenu
- OnPopup = PopupMenu1Popup
- Left = 272
- Top = 181
- end
- end
-