home *** CD-ROM | disk | FTP | other *** search
/ PC World 1999 July / PCWorld_1999-07_cd.bin / software / TemaCD / Massiva / MASSIVA.EXE / 0 / RCDATA / TFMVELOCITY / TFMVELOCITY.txt < prev   
Text File  |  1999-04-03  |  10KB  |  425 lines

  1. object fmVelocity: TfmVelocity
  2.   Left = 204
  3.   Top = 178
  4.   HelpContext = 18
  5.   BorderStyle = bsDialog
  6.   Caption = 'Velocity'
  7.   ClientHeight = 181
  8.   ClientWidth = 333
  9.   Font.Charset = ANSI_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'Arial'
  13.   Font.Style = [fsItalic]
  14.   Position = poScreenCenter
  15.   OnCreate = FormCreate
  16.   OnShow = FormShow
  17.   PixelsPerInch = 96
  18.   TextHeight = 14
  19.   object RotateLabel1: TRotateLabel
  20.     Left = 251
  21.     Top = 152
  22.     Width = 78
  23.     Height = 24
  24.     Cursor = crHandPoint
  25.     Hint = 'Click for help'
  26.     Escapement = 0
  27.     TextStyle = tsRecessed
  28.     Caption = 'Velocity'
  29.     Font.Charset = DEFAULT_CHARSET
  30.     Font.Color = clSilver
  31.     Font.Height = -21
  32.     Font.Name = 'Arial'
  33.     Font.Style = [fsBold]
  34.     ParentFont = False
  35.     ParentShowHint = False
  36.     ShowHint = True
  37.     Transparent = True
  38.     OnClick = RotateLabel1Click
  39.   end
  40.   object Panel1: TPanel
  41.     Left = 0
  42.     Top = 0
  43.     Width = 70
  44.     Height = 181
  45.     Align = alLeft
  46.     BevelOuter = bvNone
  47.     Color = clBlack
  48.     Font.Charset = DEFAULT_CHARSET
  49.     Font.Color = clSilver
  50.     Font.Height = -11
  51.     Font.Name = 'MS Sans Serif'
  52.     Font.Style = []
  53.     ParentFont = False
  54.     TabOrder = 0
  55.     object labelText: TLabel
  56.       Left = 5
  57.       Top = 119
  58.       Width = 63
  59.       Height = 63
  60.       AutoSize = False
  61.       Caption = 'Set velocity for all notes'
  62.       Font.Charset = ANSI_CHARSET
  63.       Font.Color = 8454143
  64.       Font.Height = -11
  65.       Font.Name = 'Arial'
  66.       Font.Style = []
  67.       ParentFont = False
  68.       Transparent = True
  69.       WordWrap = True
  70.     end
  71.     object panelPlay: TPanel
  72.       Left = 4
  73.       Top = 162
  74.       Width = 19
  75.       Height = 16
  76.       Color = clBlack
  77.       TabOrder = 0
  78.       object iconPlay: TIconButton
  79.         Left = 1
  80.         Top = 1
  81.         Width = 17
  82.         Height = 14
  83.         Hint = 'Play'
  84.         Align = alClient
  85.         Center = True
  86.         Picture.Data = {<image000.bmp>}
  87.         OnMouseUp = iconPlayMouseUp
  88.         State = stUp
  89.       end
  90.     end
  91.     object Panel2: TPanel
  92.       Left = 26
  93.       Top = 162
  94.       Width = 19
  95.       Height = 16
  96.       Caption = 'o'
  97.       Color = clBlack
  98.       TabOrder = 1
  99.       object IconStop: TIconButton
  100.         Left = 1
  101.         Top = 1
  102.         Width = 17
  103.         Height = 14
  104.         Hint = 'Stop'
  105.         Align = alClient
  106.         Center = True
  107.         Picture.Data = {<image001.bmp>}
  108.         OnMouseUp = IconStopMouseUp
  109.         State = stUp
  110.       end
  111.     end
  112.     object btnUndo: tnybutton
  113.       Left = 7
  114.       Top = 63
  115.       Width = 57
  116.       Height = 25
  117.       Cursor = crHandPoint
  118.       Caption = '&Undo'
  119.       Font.Charset = ANSI_CHARSET
  120.       Font.Color = clSilver
  121.       Font.Height = -11
  122.       Font.Name = 'Arial'
  123.       Font.Style = [fsBold]
  124.       ParentFont = False
  125.       TabOrder = 2
  126.       OnClick = btnundoClick
  127.     end
  128.     object tnybutton1: tnybutton
  129.       Left = 7
  130.       Top = 91
  131.       Width = 57
  132.       Height = 25
  133.       Cursor = crHandPoint
  134.       Cancel = True
  135.       Caption = '&Close'
  136.       Font.Charset = ANSI_CHARSET
  137.       Font.Color = clSilver
  138.       Font.Height = -11
  139.       Font.Name = 'Arial'
  140.       Font.Style = [fsBold]
  141.       ParentFont = False
  142.       TabOrder = 3
  143.       OnClick = tnybutton1Click
  144.     end
  145.     object tnybutton2: tnybutton
  146.       Left = 7
  147.       Top = 7
  148.       Width = 57
  149.       Height = 25
  150.       Cursor = crHandPoint
  151.       Caption = '&OK'
  152.       Default = True
  153.       Font.Charset = ANSI_CHARSET
  154.       Font.Color = clSilver
  155.       Font.Height = -11
  156.       Font.Name = 'Arial'
  157.       Font.Style = [fsBold]
  158.       ParentFont = False
  159.       TabOrder = 4
  160.       OnClick = tnybutton2Click
  161.     end
  162.     object tnybutton3: tnybutton
  163.       Left = 7
  164.       Top = 35
  165.       Width = 57
  166.       Height = 25
  167.       Cursor = crHandPoint
  168.       Caption = '&Apply'
  169.       Font.Charset = ANSI_CHARSET
  170.       Font.Color = clSilver
  171.       Font.Height = -11
  172.       Font.Name = 'Arial'
  173.       Font.Style = [fsBold]
  174.       ParentFont = False
  175.       TabOrder = 5
  176.       OnClick = tnybutton3Click
  177.     end
  178.   end
  179.   object PageControl1: TPage95Control
  180.     Left = 80
  181.     Top = 8
  182.     Width = 241
  183.     Height = 137
  184.     ActivePage = PageSet
  185.     ButtonStyle = True
  186.     FlatButtons = True
  187.     FlatSeperators = False
  188.     Font.Charset = ANSI_CHARSET
  189.     Font.Color = clWindowText
  190.     Font.Height = -11
  191.     Font.Name = 'Arial'
  192.     Font.Style = [fsBold]
  193.     HotTrack = True
  194.     TabInactiveColor = clSilver
  195.     TabInactiveFont.Charset = ANSI_CHARSET
  196.     TabInactiveFont.Color = clWindowText
  197.     TabInactiveFont.Height = -11
  198.     TabInactiveFont.Name = 'Arial'
  199.     TabInactiveFont.Style = []
  200.     ParentFont = False
  201.     TabOrder = 1
  202.     OnChange = PageControl1Change
  203.     object PageSet: TTab95Sheet
  204.       Caption = 'Set'
  205.       GripAlign = gaLeft
  206.       ImageIndex = -1
  207.       StaticPageIndex = -1
  208.       TabVisible = True
  209.       object Label1: TLabel
  210.         Left = 16
  211.         Top = 24
  212.         Width = 39
  213.         Height = 14
  214.         Caption = 'Velocity'
  215.         Font.Charset = ANSI_CHARSET
  216.         Font.Color = clWindowText
  217.         Font.Height = -11
  218.         Font.Name = 'Arial'
  219.         Font.Style = []
  220.         ParentFont = False
  221.       end
  222.       object editSetVel: TEditIncDec
  223.         Left = 64
  224.         Top = 21
  225.         Width = 34
  226.         Height = 22
  227.         Color = clBlack
  228.         Font.Charset = ANSI_CHARSET
  229.         Font.Color = clWhite
  230.         Font.Height = -11
  231.         Font.Name = 'Arial'
  232.         Font.Style = []
  233.         ParentFont = False
  234.         PopupMenu = editSetVel.
  235.         TabOrder = 0
  236.         Text = '127'
  237.         Min = 1
  238.         Max = 0
  239.       end
  240.     end
  241.     object PageFade: TTab95Sheet
  242.       Caption = 'Fade'
  243.       GripAlign = gaLeft
  244.       ImageIndex = -1
  245.       StaticPageIndex = -1
  246.       TabVisible = True
  247.       object Label2: TLabel
  248.         Left = 16
  249.         Top = 24
  250.         Width = 24
  251.         Height = 14
  252.         Caption = 'From'
  253.         Font.Charset = ANSI_CHARSET
  254.         Font.Color = clWindowText
  255.         Font.Height = -11
  256.         Font.Name = 'Arial'
  257.         Font.Style = []
  258.         ParentFont = False
  259.       end
  260.       object Label3: TLabel
  261.         Left = 136
  262.         Top = 24
  263.         Width = 12
  264.         Height = 14
  265.         Caption = 'To'
  266.         Font.Charset = ANSI_CHARSET
  267.         Font.Color = clWindowText
  268.         Font.Height = -11
  269.         Font.Name = 'Arial'
  270.         Font.Style = []
  271.         ParentFont = False
  272.       end
  273.       object editFadeMin: TEditIncDec
  274.         Left = 64
  275.         Top = 21
  276.         Width = 34
  277.         Height = 22
  278.         Color = clBlack
  279.         Font.Charset = ANSI_CHARSET
  280.         Font.Color = clWhite
  281.         Font.Height = -11
  282.         Font.Name = 'Arial'
  283.         Font.Style = []
  284.         ParentFont = False
  285.         PopupMenu = editFadeMin.
  286.         TabOrder = 0
  287.         Text = '1'
  288.         Min = 1
  289.         Max = 0
  290.       end
  291.       object editFadeMax: TEditIncDec
  292.         Left = 168
  293.         Top = 21
  294.         Width = 34
  295.         Height = 22
  296.         Color = clBlack
  297.         Font.Charset = ANSI_CHARSET
  298.         Font.Color = clWhite
  299.         Font.Height = -11
  300.         Font.Name = 'Arial'
  301.         Font.Style = []
  302.         ParentFont = False
  303.         PopupMenu = editFadeMax.
  304.         TabOrder = 1
  305.         Text = '127'
  306.         Min = 1
  307.         Max = 0
  308.       end
  309.     end
  310.     object PageChange: TTab95Sheet
  311.       Caption = 'Change'
  312.       GripAlign = gaLeft
  313.       ImageIndex = -1
  314.       StaticPageIndex = -1
  315.       TabVisible = True
  316.       object Label5: TLabel
  317.         Left = 16
  318.         Top = 24
  319.         Width = 52
  320.         Height = 14
  321.         Caption = 'Change by'
  322.         Font.Charset = ANSI_CHARSET
  323.         Font.Color = clWindowText
  324.         Font.Height = -11
  325.         Font.Name = 'Arial'
  326.         Font.Style = []
  327.         ParentFont = False
  328.       end
  329.       object editChange: TEditIncDec
  330.         Left = 80
  331.         Top = 21
  332.         Width = 34
  333.         Height = 22
  334.         Color = clBlack
  335.         Font.Charset = ANSI_CHARSET
  336.         Font.Color = clWhite
  337.         Font.Height = -11
  338.         Font.Name = 'Arial'
  339.         Font.Style = []
  340.         ParentFont = False
  341.         PopupMenu = editChange.
  342.         TabOrder = 0
  343.         Text = '0'
  344.         Min = -126
  345.         Max = 126
  346.       end
  347.     end
  348.     object PageRandom: TTab95Sheet
  349.       Caption = 'Random'
  350.       GripAlign = gaLeft
  351.       ImageIndex = -1
  352.       StaticPageIndex = -1
  353.       TabVisible = True
  354.       object Label6: TLabel
  355.         Left = 16
  356.         Top = 24
  357.         Width = 16
  358.         Height = 14
  359.         Caption = 'Min'
  360.         Font.Charset = ANSI_CHARSET
  361.         Font.Color = clWindowText
  362.         Font.Height = -11
  363.         Font.Name = 'Arial'
  364.         Font.Style = []
  365.         ParentFont = False
  366.       end
  367.       object Label7: TLabel
  368.         Left = 136
  369.         Top = 24
  370.         Width = 20
  371.         Height = 14
  372.         Caption = 'Max'
  373.         Font.Charset = ANSI_CHARSET
  374.         Font.Color = clWindowText
  375.         Font.Height = -11
  376.         Font.Name = 'Arial'
  377.         Font.Style = []
  378.         ParentFont = False
  379.       end
  380.       object editRandomMin: TEditIncDec
  381.         Left = 64
  382.         Top = 21
  383.         Width = 34
  384.         Height = 22
  385.         Color = clBlack
  386.         Font.Charset = ANSI_CHARSET
  387.         Font.Color = clWhite
  388.         Font.Height = -11
  389.         Font.Name = 'Arial'
  390.         Font.Style = []
  391.         ParentFont = False
  392.         PopupMenu = editRandomMin.
  393.         TabOrder = 0
  394.         Text = '1'
  395.         Min = 1
  396.         Max = 0
  397.       end
  398.       object editRandomMax: TEditIncDec
  399.         Left = 168
  400.         Top = 21
  401.         Width = 34
  402.         Height = 22
  403.         Color = clBlack
  404.         Font.Charset = ANSI_CHARSET
  405.         Font.Color = clWhite
  406.         Font.Height = -11
  407.         Font.Name = 'Arial'
  408.         Font.Style = []
  409.         ParentFont = False
  410.         PopupMenu = editRandomMax.
  411.         TabOrder = 1
  412.         Text = '127'
  413.         Min = 1
  414.         Max = 0
  415.       end
  416.     end
  417.   end
  418.   object Timer1: TTimer
  419.     Interval = 10
  420.     OnTimer = Timer1Timer
  421.     Left = 208
  422.     Top = 144
  423.   end
  424. end
  425.