view EventBoxUnit.dfm @ 1:f3fd4e19cec0 tip

first binary upload

object EventBox: TEventBox
  Left = 963
  Top = 83
  Caption = 'EventBox'
  ClientHeight = 511
  ClientWidth = 160
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  OnClick = FormClick
  DesignSize = (
    160
    511)
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton1: TSpeedButton
    Left = 0
    Top = 455
    Width = 81
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = 'Save'
    Flat = True
    OnClick = Save
    ExplicitTop = 418
  end
  object SpeedButton2: TSpeedButton
    Left = 80
    Top = 455
    Width = 81
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = 'Load'
    Flat = True
    OnClick = Load
    ExplicitTop = 418
  end
  object ListBox1: TListBox
    Left = 0
    Top = 0
    Width = 161
    Height = 449
    Anchors = [akLeft, akTop, akBottom]
    ItemHeight = 13
    PopupMenu = PopupMenu1
    TabOrder = 0
    OnDblClick = ListBox1DblClick
    OnKeyUp = ListBox1KeyUp
    OnMouseDown = ListBox1MouseDown
  end
  object CheckBox1: TCheckBox
    Left = 32
    Top = 486
    Width = 97
    Height = 17
    Anchors = [akLeft, akBottom]
    Caption = 'Locate event'
    TabOrder = 1
  end
  object PopupMenu1: TPopupMenu
    OnPopup = PopupMenu1Popup
    Left = 32
    Top = 80
    object Vibratowizard1: TMenuItem
      Caption = 'Vibrato...'
      OnClick = Vibratowizard1Click
    end
    object Sourcefilter1: TMenuItem
      Caption = 'Source-filter...'
      OnClick = Sourcefilter1Click
    end
    object Cut1: TMenuItem
      Caption = 'Cut'
      OnClick = Cut1Click
    end
    object Extract1: TMenuItem
      Caption = 'Extract'
      OnClick = Extract1Click
    end
  end
end