Chip: Hang es video/CHIP_ZENESZERKESZTO_2005.ISO/audio_1/soundwarp/SNDWARP.exe/0/RCDATA/TFORM1/TFORM1.txt

Text File | 2003-05-19 | 5.2 KB | 263 lines

object Form1: TForm1
  Left = 185
  Top = 108
  Width = 464
  Height = 428
  Caption = 'Sound 2D Warper'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  OnActivate = FormActivate
  OnClose = FormClose
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 351
    Top = 0
    Width = 105
    Height = 394
    Align = alRight
    TabOrder = 0
    object Label3: TLabel
      Left = 8
      Top = 40
      Width = 60
      Height = 13
      Caption = '&Window size'
      FocusControl = SizesCombo
    end
    object Label4: TLabel
      Left = 8
      Top = 77
      Width = 73
      Height = 17
      Caption = '&Range, dB'
      FocusControl = RangeEdit
    end
    object Label5: TLabel
      Left = 8
      Top = 121
      Width = 65
      Height = 17
      Caption = 'Sa&mpling'
      FocusControl = SamplingEdit
    end
    object DimXEdit: TEdit
      Left = 8
      Top = 167
      Width = 28
      Height = 21
      TabOrder = 5
      Text = '5'
      OnChange = DimXEditChange
    end
    object UpDown1: TUpDown
      Left = 36
      Top = 167
      Width = 16
      Height = 21
      Associate = DimXEdit
      Min = 2
      Position = 5
      TabOrder = 6
      Wrap = False
    end
    object DimYEdit: TEdit
      Left = 50
      Top = 167
      Width = 28
      Height = 21
      TabOrder = 7
      Text = '5'
      OnChange = DimXEditChange
    end
    object UpDown2: TUpDown
      Left = 78
      Top = 167
      Width = 16
      Height = 21
      Associate = DimYEdit
      Min = 2
      Position = 5
      TabOrder = 8
      Wrap = False
    end
    object LoadButton: TButton
      Left = 8
      Top = 8
      Width = 75
      Height = 25
      Caption = '&Load'
      Default = True
      TabOrder = 0
      OnClick = LoadButtonClick
    end
    object SizesCombo: TComboBox
      Left = 8
      Top = 56
      Width = 81
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      Items.Strings = (
        '32'
        '64'
        '128'
        '256'
        '512'
        '1024'
        '2048'
        '4096'
        '8192'
        '16384')
      TabOrder = 1
    end
    object RangeEdit: TEdit
      Left = 8
      Top = 96
      Width = 30
      Height = 21
      TabOrder = 2
      Text = '60'
    end
    object SamplingEdit: TEdit
      Left = 8
      Top = 137
      Width = 65
      Height = 21
      TabOrder = 4
      Text = '44100'
    end
    object LogCheck: TCheckBox
      Left = 46
      Top = 96
      Width = 49
      Height = 17
      Caption = 'L&og'
      State = cbChecked
      TabOrder = 3
    end
    object ProgressBar1: TProgressBar
      Left = 1
      Top = 377
      Width = 103
      Height = 16
      Align = alBottom
      Min = 0
      Max = 100
      Step = 1
      TabOrder = 14
    end
    object ApplyButton: TButton
      Left = 8
      Top = 224
      Width = 75
      Height = 25
      Caption = '&Apply'
      TabOrder = 10
      OnClick = ApplyButtonClick
    end
    object SaveButton: TButton
      Left = 8
      Top = 320
      Width = 75
      Height = 25
      Caption = '&Save'
      TabOrder = 13
      OnClick = SaveButtonClick
    end
    object ResampCheckBox: TCheckBox
      Left = 8
      Top = 200
      Width = 89
      Height = 17
      Caption = 'Resamplin&g'
      TabOrder = 9
    end
    object PlayButton: TButton
      Left = 8
      Top = 288
      Width = 75
      Height = 25
      Caption = '&Play'
      TabOrder = 12
      OnClick = PlayButtonClick
    end
    object ExitButton: TButton
      Left = 8
      Top = 352
      Width = 75
      Height = 25
      Caption = 'E&xit'
      TabOrder = 15
      OnClick = ExitButtonClick
    end
    object UndoButton: TButton
      Left = 8
      Top = 256
      Width = 75
      Height = 25
      Caption = 'Undo &Z'
      TabOrder = 11
      OnClick = UndoButtonClick
    end
  end
  object PaintPanel: TPanel
    Left = 0
    Top = 0
    Width = 313
    Height = 394
    Align = alLeft
    TabOrder = 1
    object PaintBox1: TPaintBox
      Left = 1
      Top = 201
      Width = 311
      Height = 192
      Cursor = crCross
      Align = alBottom
      ParentShowHint = False
      ShowHint = True
      OnMouseDown = PaintBox1MouseDown
      OnMouseMove = PaintBox1MouseMove
      OnMouseUp = PaintBox1MouseUp
      OnPaint = PaintBox1Paint
    end
    object PaintBox2: TPaintBox
      Left = 1
      Top = 1
      Width = 311
      Height = 192
      Cursor = crCross
      Align = alTop
      ParentShowHint = False
      ShowHint = True
      Visible = False
      OnMouseDown = PaintBox1MouseDown
      OnMouseMove = PaintBox1MouseMove
      OnMouseUp = PaintBox1MouseUp
      OnPaint = PaintBox1Paint
    end
  end
  object OpenDialog1: TOpenDialog
    FileEditStyle = fsEdit
    Filter = 'Sound files (*.wav)|*.wav|Images (*.bmp)|*.bmp'
    Title = 'Load source file'
    Left = 364
    Top = 24
  end
  object SaveDialog1: TSaveDialog
    FileEditStyle = fsEdit
    Filter = 'Sound files (*.wav)|*.wav|Images (*.bmp)|*.bmp'
    FilterIndex = 2
    Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist]
    Title = 'Save the result'
    Left = 371
    Top = 328
  end
end