home *** CD-ROM | disk | FTP | other *** search
/ PC World 1999 July / PCWorld_1999-07_cd.bin / software / TemaCD / Massiva / MASSIVA.EXE / 0 / RCDATA / TFMTRANSPOSE / TFMTRANSPOSE.txt < prev   
Text File  |  1999-04-03  |  9KB  |  354 lines
  1. object fmTranspose: TfmTranspose
  2.   Left = 239
  3.   Top = 147
  4.   HelpContext = 17
  5.   BorderStyle = bsDialog
  6.   Caption = 'Transpose'
  7.   ClientHeight = 189
  8.   ClientWidth = 324
  9.   Color = clSilver
  10.   Font.Charset = ANSI_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'Arial'
  14.   Font.Style = [fsItalic]
  15.   Position = poScreenCenter
  16.   OnCreate = FormCreate
  17.   OnShow = FormShow
  18.   PixelsPerInch = 96
  19.   TextHeight = 14
  20.   object RotateLabel1: TRotateLabel
  21.     Left = 206
  22.     Top = 159
  23.     Width = 108
  24.     Height = 24
  25.     Cursor = crHandPoint
  26.     Hint = 'Click for help'
  27.     Escapement = 0
  28.     TextStyle = tsRecessed
  29.     Caption = 'Transpose'
  30.     Font.Charset = DEFAULT_CHARSET
  31.     Font.Color = clSilver
  32.     Font.Height = -21
  33.     Font.Name = 'Arial'
  34.     Font.Style = [fsBold]
  35.     ParentFont = False
  36.     ParentShowHint = False
  37.     ShowHint = True
  38.     Transparent = True
  39.     OnClick = RotateLabel1Click
  40.   end
  41.   object Panel1: TPanel
  42.     Left = 0
  43.     Top = 0
  44.     Width = 70
  45.     Height = 189
  46.     Align = alLeft
  47.     BevelOuter = bvNone
  48.     Color = clBlack
  49.     Font.Charset = DEFAULT_CHARSET
  50.     Font.Color = clSilver
  51.     Font.Height = -11
  52.     Font.Name = 'MS Sans Serif'
  53.     Font.Style = []
  54.     ParentFont = False
  55.     TabOrder = 0
  56.     object labelText: TLabel
  57.       Left = 6
  58.       Top = 122
  59.       Width = 60
  60.       Height = 56
  61.       AutoSize = False
  62.       Caption = 'Set value to transpose all notes by'
  63.       Font.Charset = ANSI_CHARSET
  64.       Font.Color = 8454143
  65.       Font.Height = -11
  66.       Font.Name = 'Arial'
  67.       Font.Style = []
  68.       ParentFont = False
  69.       Transparent = True
  70.       WordWrap = True
  71.     end
  72.     object panelPlay: TPanel
  73.       Left = 4
  74.       Top = 170
  75.       Width = 19
  76.       Height = 16
  77.       Color = clBlack
  78.       TabOrder = 0
  79.       object iconPlay: TIconButton
  80.         Left = 1
  81.         Top = 1
  82.         Width = 17
  83.         Height = 14
  84.         Hint = 'Play'
  85.         Align = alClient
  86.         Center = True
  87.         Picture.Data = {<image000.bmp>}
  88.         OnMouseUp = iconPlayMouseUp
  89.         State = stUp
  90.       end
  91.     end
  92.     object Panel2: TPanel
  93.       Left = 26
  94.       Top = 170
  95.       Width = 19
  96.       Height = 16
  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 btnClose: 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 = btnCloseClick
  144.     end
  145.     object btnApply: tnybutton
  146.       Left = 7
  147.       Top = 35
  148.       Width = 57
  149.       Height = 25
  150.       Cursor = crHandPoint
  151.       Caption = '&Apply'
  152.       Font.Charset = ANSI_CHARSET
  153.       Font.Color = clSilver
  154.       Font.Height = -11
  155.       Font.Name = 'Arial'
  156.       Font.Style = [fsBold]
  157.       ParentFont = False
  158.       TabOrder = 4
  159.       OnClick = btnApplyClick
  160.     end
  161.     object btnOK: tnybutton
  162.       Left = 7
  163.       Top = 7
  164.       Width = 57
  165.       Height = 25
  166.       Cursor = crHandPoint
  167.       Caption = '&OK'
  168.       Default = True
  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 = btnOkClick
  177.     end
  178.   end
  179.   object PageControl1: TPage95Control
  180.     Left = 80
  181.     Top = 8
  182.     Width = 233
  183.     Height = 145
  184.     ActivePage = TabChange
  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 TabChange: TTab95Sheet
  204.       Caption = 'Change'
  205.       GripAlign = gaLeft
  206.       ImageIndex = -1
  207.       StaticPageIndex = -1
  208.       TabVisible = True
  209.       object Bevel1: TBevel
  210.         Left = 75
  211.         Top = 29
  212.         Width = 127
  213.         Height = 2
  214.         Style = bsRaised
  215.       end
  216.       object SpeedButton1: TSpeedButton
  217.         Left = 140
  218.         Top = 18
  219.         Width = 20
  220.         Height = 20
  221.         Hint = 'Up 1'
  222.         Glyph.Data = {
  223.           BE000000424DBE00000000000000760000002800000009000000090000000100
  224.           0400000000004800000000000000000000001000000000000000000000000000
  225.           80000080000000808000800000008000800080800000C0C0C000808080000000
  226.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFF000
  227.           0000FFFFFFFFF0000000CCCCCCCCC0000000FCCCCCCCF0000000FFCCCCCFF000
  228.           0000FFFCCCFFF0000000FFFFCFFFF0000000FFFFFFFFF0000000FFFFFFFFF000
  229.           0000}
  230.         ParentShowHint = False
  231.         ShowHint = True
  232.         OnClick = SpeedButton1Click
  233.       end
  234.       object SpeedButton2: TSpeedButton
  235.         Left = 165
  236.         Top = 21
  237.         Width = 20
  238.         Height = 20
  239.         Hint = 'Down 1'
  240.         Glyph.Data = {
  241.           BE000000424DBE00000000000000760000002800000009000000090000000100
  242.           0400000000004800000000000000000000001000000000000000000000000000
  243.           80000080000000808000800000008000800080800000C0C0C000808080000000
  244.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFF000
  245.           0000FFFFFFFFF0000000FFFFCFFFF0000000FFFCCCFFF0000000FFCCCCCFF000
  246.           0000FCCCCCCCF0000000CCCCCCCCC0000000FFFFFFFFF0000000FFFFFFFFF000
  247.           0000}
  248.         ParentShowHint = False
  249.         ShowHint = True
  250.         OnClick = SpeedButton2Click
  251.       end
  252.       object SpeedButton3: TSpeedButton
  253.         Left = 90
  254.         Top = 15
  255.         Width = 20
  256.         Height = 20
  257.         Hint = 'Up 12'
  258.         Glyph.Data = {
  259.           BE000000424DBE00000000000000760000002800000009000000090000000100
  260.           0400000000004800000000000000000000001000000000000000000000000000
  261.           80000080000000808000800000008000800080800000C0C0C000808080000000
  262.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFF000
  263.           0000FFFFFFFFF0000000CCCCCCCCC0000000FFFFFFFFF0000000FFCCCCCFF000
  264.           0000FFFFFFFFF0000000FFFFCFFFF0000000FFFFFFFFF0000000FFFFFFFFF000
  265.           0000}
  266.         ParentShowHint = False
  267.         ShowHint = True
  268.         OnClick = SpeedButton3Click
  269.       end
  270.       object SpeedButton4: TSpeedButton
  271.         Left = 115
  272.         Top = 25
  273.         Width = 20
  274.         Height = 20
  275.         Hint = 'Down 12'
  276.         Glyph.Data = {
  277.           BE000000424DBE00000000000000760000002800000009000000090000000100
  278.           0400000000004800000000000000000000001000000000000000000000000000
  279.           80000080000000808000800000008000800080800000C0C0C000808080000000
  280.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFF000
  281.           0000FFFFFFFFF0000000FFFFCFFFF0000000FFFFFFFFF0000000FFCCCCCFF000
  282.           0000FFFFFFFFF0000000CCCCCCCCC0000000FFFFFFFFF0000000FFFFFFFFF000
  283.           0000}
  284.         ParentShowHint = False
  285.         ShowHint = True
  286.         OnClick = SpeedButton4Click
  287.       end
  288.       object editChange: TEditNew
  289.         Left = 24
  290.         Top = 20
  291.         Width = 34
  292.         Height = 21
  293.         Color = clBlack
  294.         Font.Charset = DEFAULT_CHARSET
  295.         Font.Color = clWhite
  296.         Font.Height = -11
  297.         Font.Name = 'MS Sans Serif'
  298.         Font.Style = []
  299.         ParentFont = False
  300.         TabOrder = 0
  301.         Text = '0'
  302.         OnKeyPress = editChangeKeyPress
  303.         FocusColor = 8454143
  304.         FocusFontColor = clBlack
  305.         NoFocusColor = clBlack
  306.         NoFocusFontColor = clWhite
  307.       end
  308.     end
  309.     object TabSet: TTab95Sheet
  310.       Caption = 'Set'
  311.       GripAlign = gaLeft
  312.       ImageIndex = -1
  313.       StaticPageIndex = -1
  314.       TabVisible = True
  315.       object Label1: TLabel
  316.         Left = 16
  317.         Top = 24
  318.         Width = 77
  319.         Height = 14
  320.         Caption = 'Set all events to'
  321.         Font.Charset = ANSI_CHARSET
  322.         Font.Color = clWindowText
  323.         Font.Height = -11
  324.         Font.Name = 'Arial'
  325.         Font.Style = []
  326.         ParentFont = False
  327.       end
  328.       object editNote: TEdit
  329.         Left = 104
  330.         Top = 20
  331.         Width = 33
  332.         Height = 21
  333.         CharCase = ecUpperCase
  334.         Color = clBlack
  335.         Font.Charset = DEFAULT_CHARSET
  336.         Font.Color = clWhite
  337.         Font.Height = -11
  338.         Font.Name = 'MS Sans Serif'
  339.         Font.Style = []
  340.         MaxLength = 3
  341.         ParentFont = False
  342.         TabOrder = 0
  343.         OnChange = editNoteChange
  344.       end
  345.     end
  346.   end
  347.   object Timer1: TTimer
  348.     Interval = 10
  349.     OnTimer = Timer1Timer
  350.     Left = 251
  351.     Top = 88
  352.   end
  353. end
  354.