home *** CD-ROM | disk | FTP | other *** search
- object SoundForm: TSoundForm
- Left = 263
- Top = 115
- HelpContext = 41014
- ActiveControl = OKBtn
- BorderStyle = bsDialog
- Caption = 'Change Sounds (WAV Files)'
- ClientHeight = 322
- ClientWidth = 394
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- PixelsPerInch = 96
- Position = poScreenCenter
- TextHeight = 13
- object Bevel1: TBevel
- Left = 8
- Top = 8
- Width = 377
- Height = 257
- Shape = bsFrame
- IsControl = True
- end
- object Label1: TLabel
- Left = 16
- Top = 24
- Width = 96
- Height = 16
- Hint =
- 'This is the sound that plays when you get the Power Meter to 100' +
- '%.'
- Caption = 'Bonus Sound:'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- end
- object Label2: TLabel
- Left = 16
- Top = 120
- Width = 87
- Height = 16
- Hint = 'This is a sound which plays on a losing spin.'
- Caption = 'Lose Sound:'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- end
- object Label3: TLabel
- Left = 16
- Top = 72
- Width = 119
- Height = 16
- Hint =
- 'This is the sound which plays when you get a Power Drain symbol ' +
- 'on the screen'
- Caption = 'Card Deal Sound'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- end
- object Label5: TLabel
- Left = 16
- Top = 168
- Width = 79
- Height = 16
- Hint = 'This is a sound which plays on a winning spin.'
- Caption = 'Win Sound:'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- end
- object OKBtn: TBitBtn
- Left = 224
- Top = 284
- Width = 153
- Height = 27
- HelpContext = 41014
- Caption = '&OK'
- Default = True
- ModalResult = 1
- TabOrder = 0
- Glyph.Data = {
- 42010000424D4201000000000000760000002800000012000000110000000100
- 040000000000CC000000CE0E0000C40E00000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777770000007777744777777777770000007777422477777777770000007774
- 2222477777777700000077422222247777777700000074222A22224777777700
- 00007222A7A222477777770000007A2A777A222477777700000077A77777A222
- 477777000000777777777A222477770000007777777777A22247770000007777
- 7777777A222477000000777777777777A222470000007777777777777A224700
- 000077777777777777A227000000777777777777777A77000000777777777777
- 777777000000}
- Spacing = -1
- IsControl = True
- end
- object Button1: TButton
- Left = 176
- Top = 24
- Width = 81
- Height = 25
- Hint =
- 'Click this button to browse your hard drive for a sound for this' +
- ' event.'
- HelpContext = 41014
- Caption = 'Change'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 176
- Top = 120
- Width = 81
- Height = 25
- Hint =
- 'Click this button to browse your hard drive for a sound for this' +
- ' event.'
- HelpContext = 41014
- Caption = 'Change'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = Button2Click
- end
- object Button3: TButton
- Left = 176
- Top = 72
- Width = 81
- Height = 25
- Hint =
- 'Click this button to browse your hard drive for a sound for this' +
- ' event.'
- HelpContext = 41014
- Caption = 'Change'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = Button3Click
- end
- object Button5: TButton
- Left = 176
- Top = 168
- Width = 81
- Height = 25
- Hint =
- 'Click this button to browse your hard drive for a sound for this' +
- ' event.'
- HelpContext = 41014
- Caption = 'Change'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- OnClick = Button5Click
- end
- object Button6: TButton
- Left = 288
- Top = 24
- Width = 81
- Height = 25
- Hint = 'Click this button to play the currently selected sound file.'
- HelpContext = 41014
- Caption = 'Preview'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = Button6Click
- end
- object Button7: TButton
- Left = 288
- Top = 120
- Width = 81
- Height = 25
- Hint = 'Click this button to play the currently selected sound file.'
- HelpContext = 41014
- Caption = 'Preview'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- OnClick = Button7Click
- end
- object Button8: TButton
- Left = 288
- Top = 72
- Width = 81
- Height = 25
- Hint = 'Click this button to play the currently selected sound file.'
- HelpContext = 41014
- Caption = 'Preview'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 7
- OnClick = Button8Click
- end
- object Button10: TButton
- Left = 288
- Top = 168
- Width = 81
- Height = 25
- Hint = 'Click this button to play the currently selected sound file.'
- HelpContext = 41014
- Caption = 'Preview'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 8
- OnClick = Button10Click
- end
- object Button11: TButton
- Left = 16
- Top = 216
- Width = 353
- Height = 33
- Hint =
- 'Click this button to use the default (original) sounds for the a' +
- 'bove events.'
- HelpContext = 41014
- Caption = 'Restore Default Sounds'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 9
- OnClick = Button11Click
- end
- object BitBtn1: TBitBtn
- Left = 16
- Top = 284
- Width = 153
- Height = 27
- HelpContext = 41014
- TabOrder = 10
- Kind = bkHelp
- Spacing = -1
- IsControl = True
- end
- object OpenDialog1: TOpenDialog
- Left = 87
- Top = 227
- end
- end
-