object ringDlg: TringDlg Left = 121 Top = 222 HelpContext = 3050 ActiveControl = rateEdit BorderIcons = [] BorderStyle = bsDialog Caption = 'Ring modulate' ClientHeight = 182 ClientWidth = 319 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] OnActivate = FormActivate OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object fromFile: TLabel Left = 288 Top = 144 Width = 45 Height = 13 Caption = 'fromFile' Visible = False end object toFile: TLabel Left = 288 Top = 160 Width = 32 Height = 13 Caption = 'toFile' Visible = False end object Bevel2: TBevel Left = 8 Top = 104 Width = 305 Height = 33 end object gauge: TGauge Left = 16 Top = 112 Width = 289 Height = 17 ForeColor = clLime Progress = 0 end object CancelBtn: TBitBtn Left = 124 Top = 148 Width = 77 Height = 27 Cursor = crArrow Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 0 OnClick = CancelBtnClick Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000000000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333333333000033337733333333333333333F333333333333 0000333911733333973333333377F333333F3333000033391117333911733333 37F37F333F77F33300003339111173911117333337F337F3F7337F3300003333 911117111117333337F3337F733337F3000033333911111111733333337F3337 3333F7330000333333911111173333333337F333333F73330000333333311111 7333333333337F3333373333000033333339111173333333333337F333733333 00003333339111117333333333333733337F3333000033333911171117333333 33337333337F333300003333911173911173333333373337F337F33300003333 9117333911173333337F33737F337F33000033333913333391113333337FF733 37F337F300003333333333333919333333377333337FFF730000333333333333 3333333333333333333777330000333333333333333333333333333333333333 0000} Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 208 Top = 148 Width = 77 Height = 27 HelpContext = 3050 TabOrder = 1 OnClick = HelpBtnClick Kind = bkHelp Margin = 2 Spacing = -1 IsControl = True end object GroupBox1: TGroupBox Left = 8 Top = 8 Width = 305 Height = 89 Caption = 'Modulator' TabOrder = 2 object Label1: TLabel Left = 8 Top = 20 Width = 55 Height = 13 Caption = 'Rate (Hz)' end object Bevel1: TBevel Left = 8 Top = 48 Width = 289 Height = 33 Style = bsRaised end object rateEdit: TEdit Left = 72 Top = 20 Width = 205 Height = 21 TabOrder = 0 Text = 'rateEdit' OnClick = rateEditExit OnEnter = rateEditEnter OnExit = rateEditExit OnKeyPress = rateEditKeyPress end object rateSpin: TSpinButton Left = 276 Top = 21 Width = 20 Height = 19 DownGlyph.Data = { A6000000424DA600000000000000760000002800000009000000060000000100 0400000000003000000000000000000000000000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000 0000333303333000000033300033300000003300000330000000300000003000 00003333333330000000} TabOrder = 1 UpGlyph.Data = { A6000000424DA600000000000000760000002800000009000000060000000100 0400000000003000000000000000000000000000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000 0000300000003000000033000003300000003330003330000000333303333000 00003333333330000000} OnDownClick = rateSpinDownClick OnUpClick = rateSpinUpClick end object sinButton: TRadioButton Left = 20 Top = 56 Width = 49 Height = 17 Caption = 'Sine ' Checked = True TabOrder = 2 TabStop = True end object sqrButton: TRadioButton Left = 81 Top = 56 Width = 65 Height = 17 Caption = 'Square ' TabOrder = 3 end object triButton: TRadioButton Left = 160 Top = 56 Width = 73 Height = 17 Caption = 'Triangle ' TabOrder = 4 end object sawButton: TRadioButton Left = 240 Top = 56 Width = 49 Height = 17 Caption = 'Saw ' TabOrder = 5 end end object OKBtn: TBitBtn Left = 40 Top = 148 Width = 77 Height = 27 Caption = 'OK' ModalResult = 1 TabOrder = 3 OnClick = OKbtnClick Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000000000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333330000333333333333333333333333F33333333333 00003333344333333333333333377F3333333333000033334224333333333333 337337F3333333330000333422224333333333333733337F3333333300003342 222224333333333373333337F3333333000034222A22224333333337F337F333 7F33333300003222A3A2224333333337F3737F337F33333300003A2A333A2224 33333337F73337F337F33333000033A33333A222433333337333337F337F3333 0000333333333A222433333333333337F337F33300003333333333A222433333 333333337F337F33000033333333333A222433333333333337F337F300003333 33333333A222433333333333337F337F00003333333333333A22433333333333 3337F37F000033333333333333A223333333333333337F730000333333333333 333A333333333333333337330000333333333333333333333333333333333333 0000} Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object timer: TTimer Enabled = False Interval = 500 OnTimer = timerTimer Left = 296 Top = 88 end end