object Options: TOptions Left = 242 Top = 152 BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsSingle Caption = 'Options' ClientHeight = 268 ClientWidth = 440 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object PageControl1: TPageControl Left = 0 Top = 6 Width = 440 Height = 233 ActivePage = TabSheet1 Align = alClient TabOrder = 0 object TabSheet1: TTabSheet Caption = ' General ' object GroupBox1: TGroupBox Left = 4 Top = 12 Width = 225 Height = 157 HelpContext = 100100 Caption = 'Buffer size' TabOrder = 0 object Label1: TLabel Left = 8 Top = 96 Width = 205 Height = 53 AutoSize = False Caption = 'The bigger the Buffer, the less the Music "hangs", but the more ' + 'ram is needed.' end object staBufferSize: TLabel Left = 16 Top = 56 Width = 185 Height = 13 AutoSize = False end object sldBufferSize: TTrackBar Left = 4 Top = 20 Width = 209 Height = 33 HelpContext = 100100 LineSize = 2 Max = 17 Orientation = trHorizontal Frequency = 1 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 0 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = sldBufferSizeChange end end object GroupBox2: TGroupBox Left = 244 Top = 12 Width = 177 Height = 157 HelpContext = 100200 Caption = 'Output mode' TabOrder = 1 object chk8bit_Mono: TRadioButton Left = 8 Top = 20 Width = 97 Height = 17 HelpContext = 100200 Caption = '8 Bit; Mono' TabOrder = 0 OnClick = chk8bit_MonoClick end object chk16bit_Mono: TRadioButton Left = 8 Top = 68 Width = 113 Height = 17 HelpContext = 100200 Caption = '16 Bit; Mono' TabOrder = 1 OnClick = chk16bit_MonoClick end object chk8bit_Stereo: TRadioButton Left = 8 Top = 44 Width = 113 Height = 17 HelpContext = 100200 Caption = '8 Bit; Stereo' TabOrder = 2 OnClick = chk8bit_StereoClick end object chk16bit_Stereo: TRadioButton Left = 8 Top = 92 Width = 113 Height = 17 HelpContext = 100200 Caption = '16 Bit; Stereo' Checked = True TabOrder = 3 TabStop = True OnClick = chk16bit_StereoClick end end end object TabSheet3: TTabSheet Caption = ' Advanced ' object GroupBox3: TGroupBox Left = 4 Top = 12 Width = 305 Height = 97 HelpContext = 100300 Caption = 'Mixing Frequency' TabOrder = 0 object staSampFText: TLabel Left = 164 Top = 24 Width = 125 Height = 17 AutoSize = False end object Label6: TLabel Left = 16 Top = 60 Width = 249 Height = 33 AutoSize = False Caption = 'The higher the Mixing frequency the better, but the more CPU-tim' + 'e is needed.' end object sldSamplingFreq: TTrackBar Left = 4 Top = 20 Width = 150 Height = 33 HelpContext = 100300 Max = 4 Orientation = trHorizontal Frequency = 1 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 0 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = sldSamplingFreqChange end end object GroupBox10: TGroupBox Left = 4 Top = 120 Width = 305 Height = 65 HelpContext = 100400 Caption = 'Scroller speed' TabOrder = 1 object staScrollerSpeed: TLabel Left = 164 Top = 24 Width = 125 Height = 17 AutoSize = False end object sldScrollSpeed: TTrackBar Left = 8 Top = 20 Width = 150 Height = 37 HelpContext = 100400 Max = 3 Orientation = trHorizontal Frequency = 1 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 0 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = sldScrollSpeedChange end end end object TabSheet6: TTabSheet Caption = 'Other' object GroupBox11: TGroupBox Left = 4 Top = 120 Width = 421 Height = 65 HelpContext = 100050 Caption = 'Fadeout-Time' TabOrder = 0 object staFadeout: TLabel Left = 232 Top = 28 Width = 177 Height = 21 AutoSize = False Caption = 'staFadeout' end object sldFadeout: TTrackBar Left = 8 Top = 20 Width = 209 Height = 33 Max = 30 Orientation = trHorizontal Frequency = 1 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 0 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = sldFadeoutChange end end object GroupBox12: TGroupBox Left = 4 Top = 12 Width = 421 Height = 89 HelpContext = 100150 Caption = 'Program for volume-control ("Actions"-"Volume")' TabOrder = 1 object Label5: TLabel Left = 12 Top = 52 Width = 393 Height = 29 AutoSize = False Caption = 'This command will be executed, when you select "Actions" - "Volu' + 'me". If you want the default volume-control: leave it blank.' end object ediVolumeControl: TEdit Left = 8 Top = 20 Width = 309 Height = 21 TabOrder = 0 end object btnVolumeControlSelected: TNewButton Left = 332 Top = 18 Width = 75 Height = 23 Caption = '&Browse' TabOrder = 1 OnClick = btnVolumeControlSelectedClick end end end object TabSheet2: TTabSheet Caption = 'User Actions #1' object GroupBox4: TGroupBox Left = 4 Top = 12 Width = 421 Height = 53 Caption = 'Execute this Line when selected (F10)' TabOrder = 0 object ediAction1: TEdit Left = 8 Top = 20 Width = 309 Height = 21 HelpContext = 100500 TabOrder = 0 end object btnUserAction1: TNewButton Left = 332 Top = 18 Width = 75 Height = 23 HelpContext = 100900 Caption = '&Browse' TabOrder = 1 OnClick = btnUserAction1Click end end object chkSleep1: TCheckBox Left = 8 Top = 72 Width = 209 Height = 17 HelpContext = 100600 Caption = 'Sleep for 1 second before execute' TabOrder = 1 end object chkClose1: TCheckBox Left = 8 Top = 92 Width = 337 Height = 17 HelpContext = 100700 Caption = 'Close module before execute' TabOrder = 2 end object GroupBox5: TGroupBox Left = 4 Top = 132 Width = 421 Height = 65 Caption = 'Hint' TabOrder = 3 object Label3: TLabel Left = 8 Top = 15 Width = 405 Height = 42 AutoSize = False Caption = 'You may specify the current Module by typing %1 anywhere. %1 wil' + 'l insert the current name and path in short Form (8+3), "%1" wil' + 'l do the same with long Filenames.' end end end object TabSheet4: TTabSheet Caption = 'User Action #2' object GroupBox6: TGroupBox Left = 4 Top = 132 Width = 421 Height = 65 Caption = 'Hint' TabOrder = 0 object Label2: TLabel Left = 8 Top = 15 Width = 405 Height = 42 AutoSize = False Caption = 'You may specify the current Module by typing %1 anywhere. %1 wil' + 'l insert the current name and path in short Form (8+3), "%1" wil' + 'l do the same with long Filenames.' end end object GroupBox8: TGroupBox Left = 4 Top = 12 Width = 421 Height = 53 Caption = 'Execute this Line when selected (F11)' TabOrder = 1 object ediAction2: TEdit Left = 8 Top = 20 Width = 309 Height = 21 HelpContext = 100500 TabOrder = 0 end object btnUserAction2: TNewButton Left = 332 Top = 18 Width = 75 Height = 23 HelpContext = 100900 Caption = '&Browse' TabOrder = 1 OnClick = btnUserAction2Click end end object chkSleep2: TCheckBox Left = 8 Top = 72 Width = 209 Height = 17 HelpContext = 100600 Caption = 'Sleep for 1 second before execute' TabOrder = 2 end object chkClose2: TCheckBox Left = 8 Top = 92 Width = 337 Height = 17 HelpContext = 100700 Caption = 'Close module before execute' TabOrder = 3 end end object TabSheet5: TTabSheet Caption = 'User Action #3' object GroupBox7: TGroupBox Left = 4 Top = 132 Width = 421 Height = 65 Caption = 'Hint' TabOrder = 0 object Label4: TLabel Left = 8 Top = 15 Width = 405 Height = 42 AutoSize = False Caption = 'You may specify the current Module by typing %1 anywhere. %1 wil' + 'l insert the current name and path in short Form (8+3), "%1" wil' + 'l do the same with long Filenames.' end end object GroupBox9: TGroupBox Left = 4 Top = 12 Width = 421 Height = 53 Caption = 'Execute this Line when selected (F12)' TabOrder = 1 object ediAction3: TEdit Left = 8 Top = 20 Width = 309 Height = 21 HelpContext = 100500 TabOrder = 0 end object btnUserAction3: TNewButton Left = 332 Top = 18 Width = 75 Height = 23 HelpContext = 100900 Caption = '&Browse' TabOrder = 1 OnClick = btnUserAction3Click end end object chkSleep3: TCheckBox Left = 8 Top = 72 Width = 209 Height = 17 HelpContext = 100600 Caption = 'Sleep for 1 second before execute' TabOrder = 2 end object chkClose3: TCheckBox Left = 8 Top = 92 Width = 337 Height = 17 HelpContext = 100700 Caption = 'Close module before execute' TabOrder = 3 end end end object panButtom: TPanel Left = 0 Top = 239 Width = 440 Height = 29 Align = alBottom BevelOuter = bvNone TabOrder = 1 object btnCancel: TNewButton Left = 360 Top = 4 Width = 75 Height = 23 HelpContext = 90200 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 0 OnClick = btnCancelClick end object btnOK: TNewButton Left = 276 Top = 4 Width = 75 Height = 23 HelpContext = 90100 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 1 OnClick = btnOKClick end end object Panel1: TPanel Left = 0 Top = 0 Width = 440 Height = 6 Align = alTop BevelOuter = bvNone TabOrder = 2 end object opdSelectApp: TOpenDialog FileEditStyle = fsEdit Filter = 'All Programs (*.exe,*.bat,*.com)|*.EXE;*.BAT;*:COM;*.PIF|All Fil' + 'es (*.*)|*.*' InitialDir = 'C:\' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofShareAware, ofNoReadOnlyReturn] Left = 396 Top = 114 end object opdVolumeControl: TOpenDialog FileEditStyle = fsEdit Filter = 'All Programs (*.exe,*.bat,*.com)|*.EXE;*.BAT;*:COM;*.PIF|All Fil' + 'es (*.*)|*.*' InitialDir = 'C:\' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofShareAware, ofNoReadOnlyReturn] Left = 392 Top = 166 end end