home *** CD-ROM | disk | FTP | other *** search
/ Geek 6 / Geek-006.iso / audio / composicao / dflow170.exe / drumflow.exe / 0 / RCDATA / TQSEDITOR / TQSEDITOR.txt
Text File  |  2000-10-23  |  3KB  |  120 lines
  1. object QSEditor: TQSEditor
  2.   Left = 256
  3.   Top = 148
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsSingle
  6.   Caption = 'QS-Voices'
  7.   ClientHeight = 153
  8.   ClientWidth = 221
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   FormStyle = fsStayOnTop
  15.   Menu = MainMenu1
  16.   Scaled = False
  17.   OnCreate = FormCreate
  18.   PixelsPerInch = 96
  19.   TextHeight = 13
  20.   object qstable: TStringGrid
  21.     Left = 0
  22.     Top = 0
  23.     Width = 221
  24.     Height = 153
  25.     Align = alClient
  26.     BorderStyle = bsNone
  27.     ColCount = 4
  28.     DefaultColWidth = 16
  29.     DefaultRowHeight = 16
  30.     RowCount = 9
  31.     Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goEditing]
  32.     PopupMenu = PopupMenu1
  33.     ScrollBars = ssNone
  34.     TabOrder = 0
  35.     OnKeyPress = qstableKeyPress
  36.     OnMouseDown = qstableMouseDown
  37.     OnMouseUp = qstableMouseUp
  38.     OnSelectCell = qstableSelectCell
  39.     ColWidths = (
  40.       16
  41.       88
  42.       34
  43.       79)
  44.   end
  45.   object MainMenu1: TMainMenu
  46.     Left = 188
  47.     Top = 120
  48.     object File1: TMenuItem
  49.       Caption = '&File'
  50.       OnClick = File1Click
  51.       object Clear1: TMenuItem
  52.         Caption = '&Clear all...'
  53.         ShortCut = 16462
  54.         OnClick = Clear1Click
  55.       end
  56.       object Open1: TMenuItem
  57.         Caption = '&Load...'
  58.         ShortCut = 16463
  59.         OnClick = Open1Click
  60.       end
  61.       object Saveas1: TMenuItem
  62.         Caption = '&Save as...'
  63.         ShortCut = 16467
  64.         OnClick = Saveas1Click
  65.       end
  66.     end
  67.     object Clipboard1: TMenuItem
  68.       Caption = '&Clipboard'
  69.       OnClick = Clipboard1Click
  70.       object Copyallvoices1: TMenuItem
  71.         Caption = '&Copy all voices'
  72.         ShortCut = 16472
  73.         OnClick = Copyallvoices1Click
  74.       end
  75.       object Copy1: TMenuItem
  76.         Caption = 'C&opy voice as text'
  77.         ShortCut = 16451
  78.         OnClick = Copy1Click
  79.       end
  80.       object Paste1: TMenuItem
  81.         Caption = '&Paste voice as text'
  82.         ShortCut = 16470
  83.         OnClick = Paste1Click
  84.       end
  85.     end
  86.   end
  87.   object odlg: TOpenDialog
  88.     Filter = 
  89.       'QS-Voice SySex|*.syx|QS300 User Bank (QS-Editor)|*.ubk|All files' +
  90.       '|*.*'
  91.     Left = 132
  92.     Top = 120
  93.   end
  94.   object sdlg: TSaveDialog
  95.     DefaultExt = 'syx'
  96.     Filter = 'QS-Voice SySex|*.syx|All files|*.*'
  97.     Title = 'QS-Voice save'
  98.     Left = 160
  99.     Top = 120
  100.   end
  101.   object PopupMenu1: TPopupMenu
  102.     OnPopup = PopupMenu1Popup
  103.     Left = 104
  104.     Top = 120
  105.     object Loadvoice1: TMenuItem
  106.       Caption = 'L&oad voice...'
  107.       OnClick = Open1Click
  108.     end
  109.     object Savevoice1: TMenuItem
  110.       Caption = '&Save voice...'
  111.       OnClick = Saveas1Click
  112.     end
  113.     object Clearvoice1: TMenuItem
  114.       Caption = 'Cl&ear voice'
  115.       ShortCut = 46
  116.       OnClick = Clearvoice1Click
  117.     end
  118.   end
  119. end
  120.