home *** CD-ROM | disk | FTP | other *** search
/ PC World 1999 July / PCWorld_1999-07_cd.bin / software / TemaCD / Massiva / MASSIVA.EXE / 0 / RCDATA / TFMCOMPOSE3 / TFMCOMPOSE3.txt < prev   
Text File  |  1999-04-03  |  18KB  |  791 lines
  1. object fmCompose3: TfmCompose3
  2.   Left = 231
  3.   Top = 278
  4.   BorderStyle = bsDialog
  5.   Caption = 'Compose AWE NRPN'
  6.   ClientHeight = 237
  7.   ClientWidth = 381
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   Position = poScreenCenter
  14.   OnCreate = FormCreate
  15.   OnShow = FormShow
  16.   PixelsPerInch = 96
  17.   TextHeight = 13
  18.   object RotateLabel1: TRotateLabel
  19.     Left = 156
  20.     Top = 209
  21.     Width = 216
  22.     Height = 24
  23.     Cursor = crHandPoint
  24.     Hint = 'Click for help'
  25.     Escapement = 0
  26.     TextStyle = tsRecessed
  27.     Caption = 'Compose AWE NRPN'
  28.     Font.Charset = DEFAULT_CHARSET
  29.     Font.Color = clSilver
  30.     Font.Height = -21
  31.     Font.Name = 'Arial'
  32.     Font.Style = [fsBold]
  33.     ParentFont = False
  34.     ParentShowHint = False
  35.     ShowHint = True
  36.     Transparent = True
  37.   end
  38.   object Panel1: TPanel
  39.     Left = 0
  40.     Top = 0
  41.     Width = 70
  42.     Height = 237
  43.     Align = alLeft
  44.     BevelOuter = bvNone
  45.     Color = clBlack
  46.     Font.Charset = DEFAULT_CHARSET
  47.     Font.Color = clSilver
  48.     Font.Height = -11
  49.     Font.Name = 'MS Sans Serif'
  50.     Font.Style = []
  51.     ParentFont = False
  52.     TabOrder = 2
  53.     object labelText: TLabel
  54.       Left = 9
  55.       Top = 128
  56.       Width = 55
  57.       Height = 113
  58.       AutoSize = False
  59.       Caption = 'Select NRPN to input at beginning of part'
  60.       Font.Charset = ANSI_CHARSET
  61.       Font.Color = 8454143
  62.       Font.Height = -11
  63.       Font.Name = 'Arial'
  64.       Font.Style = []
  65.       ParentFont = False
  66.       Transparent = True
  67.       WordWrap = True
  68.     end
  69.     object panelPlay: TPanel
  70.       Left = 4
  71.       Top = 218
  72.       Width = 19
  73.       Height = 16
  74.       Hint = 'Play'
  75.       Color = clBlack
  76.       TabOrder = 4
  77.       object iconPlay: TIconButton
  78.         Left = 1
  79.         Top = 1
  80.         Width = 17
  81.         Height = 14
  82.         Align = alClient
  83.         Center = True
  84.         Picture.Data = {<image000.bmp>}
  85.         OnMouseUp = iconPlayMouseUp
  86.         State = stUp
  87.       end
  88.     end
  89.     object Panel2: TPanel
  90.       Left = 26
  91.       Top = 218
  92.       Width = 19
  93.       Height = 16
  94.       Color = clBlack
  95.       TabOrder = 5
  96.       object IconStop: TIconButton
  97.         Left = 1
  98.         Top = 1
  99.         Width = 17
  100.         Height = 14
  101.         Hint = 'Stop'
  102.         Align = alClient
  103.         Center = True
  104.         Picture.Data = {<image001.bmp>}
  105.         OnMouseUp = IconStopMouseUp
  106.         State = stUp
  107.       end
  108.     end
  109.     object btnClose: tnybutton
  110.       Left = 7
  111.       Top = 92
  112.       Width = 57
  113.       Height = 25
  114.       Cursor = crHandPoint
  115.       Cancel = True
  116.       Caption = '&Close'
  117.       Font.Charset = ANSI_CHARSET
  118.       Font.Color = clSilver
  119.       Font.Height = -11
  120.       Font.Name = 'Arial'
  121.       Font.Style = [fsBold]
  122.       ParentFont = False
  123.       TabOrder = 3
  124.       OnClick = btnCloseClick
  125.     end
  126.     object btnUndo: tnybutton
  127.       Left = 7
  128.       Top = 63
  129.       Width = 57
  130.       Height = 25
  131.       Cursor = crHandPoint
  132.       Caption = '&Undo'
  133.       Font.Charset = ANSI_CHARSET
  134.       Font.Color = clSilver
  135.       Font.Height = -11
  136.       Font.Name = 'Arial'
  137.       Font.Style = [fsBold]
  138.       ParentFont = False
  139.       TabOrder = 2
  140.       OnClick = btnUndoClick
  141.     end
  142.     object tnybutton1: tnybutton
  143.       Left = 8
  144.       Top = 34
  145.       Width = 57
  146.       Height = 25
  147.       Cursor = crHandPoint
  148.       Caption = '&Apply'
  149.       Font.Charset = ANSI_CHARSET
  150.       Font.Color = clSilver
  151.       Font.Height = -11
  152.       Font.Name = 'Arial'
  153.       Font.Style = [fsBold]
  154.       ParentFont = False
  155.       TabOrder = 1
  156.       OnClick = tnybutton1Click
  157.     end
  158.     object tnybutton2: tnybutton
  159.       Left = 8
  160.       Top = 7
  161.       Width = 57
  162.       Height = 25
  163.       Cursor = crHandPoint
  164.       Caption = '&OK'
  165.       Default = True
  166.       Font.Charset = ANSI_CHARSET
  167.       Font.Color = clSilver
  168.       Font.Height = -11
  169.       Font.Name = 'Arial'
  170.       Font.Style = [fsBold]
  171.       ParentFont = False
  172.       TabOrder = 0
  173.       OnClick = tnybutton2Click
  174.     end
  175.   end
  176.   object PageControl1: TPage95Control
  177.     Left = 80
  178.     Top = 8
  179.     Width = 289
  180.     Height = 193
  181.     ActivePage = TabPattern
  182.     ButtonStyle = True
  183.     FlatButtons = True
  184.     FlatSeperators = False
  185.     Font.Charset = ANSI_CHARSET
  186.     Font.Color = clWindowText
  187.     Font.Height = -11
  188.     Font.Name = 'Arial'
  189.     Font.Style = [fsBold]
  190.     HotTrack = True
  191.     TabInactiveColor = clSilver
  192.     TabInactiveFont.Charset = ANSI_CHARSET
  193.     TabInactiveFont.Color = clWindowText
  194.     TabInactiveFont.Height = -11
  195.     TabInactiveFont.Name = 'Arial'
  196.     TabInactiveFont.Style = []
  197.     ParentFont = False
  198.     TabOrder = 3
  199.     OnChange = PageControl1Change
  200.     object TabSet: TTab95Sheet
  201.       Caption = 'Set'
  202.       GripAlign = gaLeft
  203.       ImageIndex = -1
  204.       StaticPageIndex = -1
  205.       TabVisible = True
  206.       object Label1: TLabel
  207.         Left = 24
  208.         Top = 32
  209.         Width = 27
  210.         Height = 14
  211.         Caption = 'NRPN'
  212.         Font.Charset = ANSI_CHARSET
  213.         Font.Color = clWindowText
  214.         Font.Height = -11
  215.         Font.Name = 'Arial'
  216.         Font.Style = []
  217.         ParentFont = False
  218.       end
  219.       object Label2: TLabel
  220.         Left = 24
  221.         Top = 72
  222.         Width = 28
  223.         Height = 14
  224.         Caption = 'Value'
  225.         Font.Charset = ANSI_CHARSET
  226.         Font.Color = clWindowText
  227.         Font.Height = -11
  228.         Font.Name = 'Arial'
  229.         Font.Style = []
  230.         ParentFont = False
  231.       end
  232.       object setValue: TEditNew
  233.         Left = 64
  234.         Top = 68
  235.         Width = 34
  236.         Height = 21
  237.         Color = clBlack
  238.         Font.Charset = DEFAULT_CHARSET
  239.         Font.Color = clWhite
  240.         Font.Height = -11
  241.         Font.Name = 'MS Sans Serif'
  242.         Font.Style = []
  243.         ParentFont = False
  244.         TabOrder = 0
  245.         Text = '120'
  246.         OnKeyPress = setValueKeyPress
  247.         FocusColor = 8454143
  248.         FocusFontColor = clBlack
  249.         NoFocusColor = clBlack
  250.         NoFocusFontColor = clWhite
  251.       end
  252.     end
  253.     object TabFade: TTab95Sheet
  254.       Caption = 'Fade'
  255.       GripAlign = gaLeft
  256.       ImageIndex = -1
  257.       StaticPageIndex = -1
  258.       TabVisible = True
  259.       object Label3: TLabel
  260.         Left = 24
  261.         Top = 32
  262.         Width = 27
  263.         Height = 14
  264.         Caption = 'NRPN'
  265.         Font.Charset = ANSI_CHARSET
  266.         Font.Color = clWindowText
  267.         Font.Height = -11
  268.         Font.Name = 'Arial'
  269.         Font.Style = []
  270.         ParentFont = False
  271.       end
  272.       object Label4: TLabel
  273.         Left = 24
  274.         Top = 72
  275.         Width = 24
  276.         Height = 14
  277.         Caption = 'From'
  278.         Font.Charset = ANSI_CHARSET
  279.         Font.Color = clWindowText
  280.         Font.Height = -11
  281.         Font.Name = 'Arial'
  282.         Font.Style = []
  283.         ParentFont = False
  284.       end
  285.       object Label5: TLabel
  286.         Left = 136
  287.         Top = 72
  288.         Width = 12
  289.         Height = 14
  290.         Caption = 'To'
  291.         Font.Charset = ANSI_CHARSET
  292.         Font.Color = clWindowText
  293.         Font.Height = -11
  294.         Font.Name = 'Arial'
  295.         Font.Style = []
  296.         ParentFont = False
  297.       end
  298.       object Label6: TLabel
  299.         Left = 24
  300.         Top = 144
  301.         Width = 33
  302.         Height = 14
  303.         Caption = 'Editres'
  304.         Font.Charset = ANSI_CHARSET
  305.         Font.Color = clWindowText
  306.         Font.Height = -11
  307.         Font.Name = 'Arial'
  308.         Font.Style = []
  309.         ParentFont = False
  310.       end
  311.       object fadeMin: TEditNew
  312.         Left = 64
  313.         Top = 68
  314.         Width = 34
  315.         Height = 21
  316.         Color = clBlack
  317.         Font.Charset = DEFAULT_CHARSET
  318.         Font.Color = clWhite
  319.         Font.Height = -11
  320.         Font.Name = 'MS Sans Serif'
  321.         Font.Style = []
  322.         ParentFont = False
  323.         TabOrder = 0
  324.         Text = '120'
  325.         OnKeyPress = fadeMinKeyPress
  326.         FocusColor = 8454143
  327.         FocusFontColor = clBlack
  328.         NoFocusColor = clBlack
  329.         NoFocusFontColor = clWhite
  330.       end
  331.       object fadeMax: TEditNew
  332.         Left = 160
  333.         Top = 68
  334.         Width = 34
  335.         Height = 21
  336.         Color = clBlack
  337.         Font.Charset = DEFAULT_CHARSET
  338.         Font.Color = clWhite
  339.         Font.Height = -11
  340.         Font.Name = 'MS Sans Serif'
  341.         Font.Style = []
  342.         ParentFont = False
  343.         TabOrder = 1
  344.         Text = '120'
  345.         OnKeyPress = fadeMaxKeyPress
  346.         FocusColor = 8454143
  347.         FocusFontColor = clBlack
  348.         NoFocusColor = clBlack
  349.         NoFocusFontColor = clWhite
  350.       end
  351.     end
  352.     object TabRandom: TTab95Sheet
  353.       Caption = 'Random'
  354.       GripAlign = gaLeft
  355.       ImageIndex = -1
  356.       StaticPageIndex = -1
  357.       TabVisible = True
  358.       object Label10: TLabel
  359.         Left = 24
  360.         Top = 32
  361.         Width = 27
  362.         Height = 14
  363.         Caption = 'NRPN'
  364.         Font.Charset = ANSI_CHARSET
  365.         Font.Color = clWindowText
  366.         Font.Height = -11
  367.         Font.Name = 'Arial'
  368.         Font.Style = []
  369.         ParentFont = False
  370.       end
  371.       object Label7: TLabel
  372.         Left = 24
  373.         Top = 72
  374.         Width = 16
  375.         Height = 14
  376.         Caption = 'Min'
  377.         Font.Charset = ANSI_CHARSET
  378.         Font.Color = clWindowText
  379.         Font.Height = -11
  380.         Font.Name = 'Arial'
  381.         Font.Style = []
  382.         ParentFont = False
  383.       end
  384.       object Label8: TLabel
  385.         Left = 128
  386.         Top = 72
  387.         Width = 20
  388.         Height = 14
  389.         Caption = 'Max'
  390.         Font.Charset = ANSI_CHARSET
  391.         Font.Color = clWindowText
  392.         Font.Height = -11
  393.         Font.Name = 'Arial'
  394.         Font.Style = []
  395.         ParentFont = False
  396.       end
  397.       object Label9: TLabel
  398.         Left = 24
  399.         Top = 144
  400.         Width = 33
  401.         Height = 14
  402.         Caption = 'Editres'
  403.         Font.Charset = ANSI_CHARSET
  404.         Font.Color = clWindowText
  405.         Font.Height = -11
  406.         Font.Name = 'Arial'
  407.         Font.Style = []
  408.         ParentFont = False
  409.       end
  410.       object randomMin: TEditNew
  411.         Left = 64
  412.         Top = 68
  413.         Width = 34
  414.         Height = 21
  415.         Color = clBlack
  416.         Font.Charset = DEFAULT_CHARSET
  417.         Font.Color = clWhite
  418.         Font.Height = -11
  419.         Font.Name = 'MS Sans Serif'
  420.         Font.Style = []
  421.         ParentFont = False
  422.         TabOrder = 0
  423.         Text = '120'
  424.         OnKeyPress = randomMinKeyPress
  425.         FocusColor = 8454143
  426.         FocusFontColor = clBlack
  427.         NoFocusColor = clBlack
  428.         NoFocusFontColor = clWhite
  429.       end
  430.       object randomMax: TEditNew
  431.         Left = 160
  432.         Top = 68
  433.         Width = 34
  434.         Height = 21
  435.         Color = clBlack
  436.         Font.Charset = DEFAULT_CHARSET
  437.         Font.Color = clWhite
  438.         Font.Height = -11
  439.         Font.Name = 'MS Sans Serif'
  440.         Font.Style = []
  441.         ParentFont = False
  442.         TabOrder = 1
  443.         Text = '120'
  444.         OnKeyPress = randomMaxKeyPress
  445.         FocusColor = 8454143
  446.         FocusFontColor = clBlack
  447.         NoFocusColor = clBlack
  448.         NoFocusFontColor = clWhite
  449.       end
  450.     end
  451.     object TabPattern: TTab95Sheet
  452.       Caption = 'Pattern'
  453.       GripAlign = gaLeft
  454.       ImageIndex = -1
  455.       StaticPageIndex = -1
  456.       TabVisible = True
  457.       object Label11: TLabel
  458.         Left = 24
  459.         Top = 32
  460.         Width = 27
  461.         Height = 14
  462.         Caption = 'NRPN'
  463.         Font.Charset = ANSI_CHARSET
  464.         Font.Color = clWindowText
  465.         Font.Height = -11
  466.         Font.Name = 'Arial'
  467.         Font.Style = []
  468.         ParentFont = False
  469.       end
  470.       object Label12: TLabel
  471.         Left = 24
  472.         Top = 144
  473.         Width = 33
  474.         Height = 14
  475.         Caption = 'Editres'
  476.         Font.Charset = ANSI_CHARSET
  477.         Font.Color = clWindowText
  478.         Font.Height = -11
  479.         Font.Name = 'Arial'
  480.         Font.Style = []
  481.         ParentFont = False
  482.       end
  483.       object Label13: TLabel
  484.         Left = 24
  485.         Top = 64
  486.         Width = 91
  487.         Height = 14
  488.         Caption = 'Repeat this pattern'
  489.         Font.Charset = ANSI_CHARSET
  490.         Font.Color = clWindowText
  491.         Font.Height = -11
  492.         Font.Name = 'Arial'
  493.         Font.Style = []
  494.         ParentFont = False
  495.       end
  496.       object Fader1: TFader
  497.         Left = 24
  498.         Top = 88
  499.         Width = 25
  500.         Height = 41
  501.         Cursor = crHandPoint
  502.         Color = 16711808
  503.         Font.Charset = ANSI_CHARSET
  504.         Font.Color = clWhite
  505.         Font.Height = -9
  506.         Font.Name = 'Small Fonts'
  507.         Font.Style = []
  508.         ParentColor = False
  509.         ParentFont = False
  510.         Mirror = True
  511.         ShowText = True
  512.         Min = 0
  513.         Max = 127
  514.         Pos = 0
  515.         ThumbSize = 0
  516.         BkColor = clBlack
  517.       end
  518.       object Fader2: TFader
  519.         Left = 50
  520.         Top = 88
  521.         Width = 25
  522.         Height = 41
  523.         Cursor = crHandPoint
  524.         Color = 16711808
  525.         Font.Charset = ANSI_CHARSET
  526.         Font.Color = clWhite
  527.         Font.Height = -9
  528.         Font.Name = 'Small Fonts'
  529.         Font.Style = []
  530.         ParentColor = False
  531.         ParentFont = False
  532.         Mirror = True
  533.         ShowText = True
  534.         Min = 0
  535.         Max = 127
  536.         Pos = 127
  537.         ThumbSize = 0
  538.         BkColor = clBlack
  539.       end
  540.       object Fader3: TFader
  541.         Left = 76
  542.         Top = 88
  543.         Width = 25
  544.         Height = 41
  545.         Cursor = crHandPoint
  546.         Color = 16711808
  547.         Font.Charset = ANSI_CHARSET
  548.         Font.Color = clWhite
  549.         Font.Height = -9
  550.         Font.Name = 'Small Fonts'
  551.         Font.Style = []
  552.         ParentColor = False
  553.         ParentFont = False
  554.         Mirror = True
  555.         ShowText = True
  556.         Min = 0
  557.         Max = 127
  558.         Pos = 0
  559.         ThumbSize = 0
  560.         BkColor = clBlack
  561.       end
  562.       object Fader4: TFader
  563.         Left = 102
  564.         Top = 88
  565.         Width = 25
  566.         Height = 41
  567.         Cursor = crHandPoint
  568.         Color = 16711808
  569.         Font.Charset = ANSI_CHARSET
  570.         Font.Color = clWhite
  571.         Font.Height = -9
  572.         Font.Name = 'Small Fonts'
  573.         Font.Style = []
  574.         ParentColor = False
  575.         ParentFont = False
  576.         Mirror = True
  577.         ShowText = True
  578.         Min = 0
  579.         Max = 127
  580.         Pos = 127
  581.         ThumbSize = 0
  582.         BkColor = clBlack
  583.       end
  584.       object Fader5: TFader
  585.         Left = 128
  586.         Top = 88
  587.         Width = 25
  588.         Height = 41
  589.         Cursor = crHandPoint
  590.         Color = 16711808
  591.         Font.Charset = ANSI_CHARSET
  592.         Font.Color = clWhite
  593.         Font.Height = -9
  594.         Font.Name = 'Small Fonts'
  595.         Font.Style = []
  596.         ParentColor = False
  597.         ParentFont = False
  598.         Mirror = True
  599.         ShowText = True
  600.         Min = 0
  601.         Max = 127
  602.         Pos = 0
  603.         ThumbSize = 0
  604.         BkColor = clBlack
  605.       end
  606.       object Fader6: TFader
  607.         Left = 154
  608.         Top = 88
  609.         Width = 25
  610.         Height = 41
  611.         Cursor = crHandPoint
  612.         Color = 16711808
  613.         Font.Charset = ANSI_CHARSET
  614.         Font.Color = clWhite
  615.         Font.Height = -9
  616.         Font.Name = 'Small Fonts'
  617.         Font.Style = []
  618.         ParentColor = False
  619.         ParentFont = False
  620.         Mirror = True
  621.         ShowText = True
  622.         Min = 0
  623.         Max = 127
  624.         Pos = 0
  625.         ThumbSize = 0
  626.         BkColor = clBlack
  627.       end
  628.       object Fader7: TFader
  629.         Left = 180
  630.         Top = 88
  631.         Width = 25
  632.         Height = 41
  633.         Cursor = crHandPoint
  634.         Color = 16711808
  635.         Font.Charset = ANSI_CHARSET
  636.         Font.Color = clWhite
  637.         Font.Height = -9
  638.         Font.Name = 'Small Fonts'
  639.         Font.Style = []
  640.         ParentColor = False
  641.         ParentFont = False
  642.         Mirror = True
  643.         ShowText = True
  644.         Min = 0
  645.         Max = 127
  646.         Pos = 0
  647.         ThumbSize = 0
  648.         BkColor = clBlack
  649.       end
  650.       object Fader8: TFader
  651.         Left = 206
  652.         Top = 88
  653.         Width = 25
  654.         Height = 41
  655.         Cursor = crHandPoint
  656.         Color = 16711808
  657.         Font.Charset = ANSI_CHARSET
  658.         Font.Color = clWhite
  659.         Font.Height = -9
  660.         Font.Name = 'Small Fonts'
  661.         Font.Style = []
  662.         ParentColor = False
  663.         ParentFont = False
  664.         Mirror = True
  665.         ShowText = True
  666.         Min = 0
  667.         Max = 127
  668.         Pos = 127
  669.         ThumbSize = 0
  670.         BkColor = clBlack
  671.       end
  672.     end
  673.   end
  674.   object panelRes: TPanel
  675.     Left = 153
  676.     Top = 177
  677.     Width = 30
  678.     Height = 19
  679.     Cursor = crHandPoint
  680.     Hint = 'Edit resolution'
  681.     BevelOuter = bvNone
  682.     Caption = '16'
  683.     Color = clBlack
  684.     Font.Charset = DEFAULT_CHARSET
  685.     Font.Color = clWhite
  686.     Font.Height = -11
  687.     Font.Name = 'MS Sans Serif'
  688.     Font.Style = []
  689.     ParentFont = False
  690.     ParentShowHint = False
  691.     ShowHint = True
  692.     TabOrder = 4
  693.     Visible = False
  694.     OnMouseDown = panelResMouseDown
  695.     OnMouseUp = panelResMouseUp
  696.   end
  697.   object nrpnlist: TComboBox
  698.     Left = 168
  699.     Top = 64
  700.     Width = 145
  701.     Height = 21
  702.     Style = csDropDownList
  703.     Color = clBlack
  704.     Font.Charset = DEFAULT_CHARSET
  705.     Font.Color = clWhite
  706.     Font.Height = -11
  707.     Font.Name = 'MS Sans Serif'
  708.     Font.Style = []
  709.     ItemHeight = 13
  710.     Items.Strings = (
  711.       'LFO1Delay'
  712.       'LFO1Frequency'
  713.       'LFO2Delay'
  714.       'LFO2Frequency'
  715.       'Env1Delay'
  716.       'Env1Attack'
  717.       'Env1Hold'
  718.       'Env1Decay'
  719.       'Env1Sustain'
  720.       'Env1Release'
  721.       'Env2Delay'
  722.       'Env2Attack'
  723.       'Env2Hold'
  724.       'Env2Decay'
  725.       'Env2Sustain'
  726.       'Env2Release'
  727.       'Pitch'
  728.       'LFO1ToPitch'
  729.       'LFO2ToPitch'
  730.       'Env1ToPitch'
  731.       'Env1ToVolum'
  732.       'FilterCutoff'
  733.       'FilterQ'
  734.       'LFO1ToFilterCutoff'
  735.       'Env1ToFilterCutoff'
  736.       'Chorus'
  737.       'Reverb')
  738.     ParentFont = False
  739.     TabOrder = 1
  740.   end
  741.   object chkOverwrite: TCheckBox
  742.     Left = 111
  743.     Top = 42
  744.     Width = 74
  745.     Height = 17
  746.     Caption = 'Overwrite'
  747.     Font.Charset = ANSI_CHARSET
  748.     Font.Color = clWindowText
  749.     Font.Height = -11
  750.     Font.Name = 'Arial'
  751.     Font.Style = []
  752.     ParentFont = False
  753.     State = cbChecked
  754.     TabOrder = 0
  755.   end
  756.   object PopupRes: TPopupMenu
  757.     Left = 196
  758.     Top = 224
  759.     object N641: TMenuItem
  760.       Caption = '64'
  761.       OnClick = N641Click
  762.     end
  763.     object N321: TMenuItem
  764.       Caption = '32'
  765.       OnClick = N321Click
  766.     end
  767.     object N161: TMenuItem
  768.       Caption = '16'
  769.       OnClick = N161Click
  770.     end
  771.     object N81: TMenuItem
  772.       Caption = '8'
  773.       OnClick = N81Click
  774.     end
  775.     object N41: TMenuItem
  776.       Caption = '4'
  777.       OnClick = N41Click
  778.     end
  779.     object N21: TMenuItem
  780.       Caption = '2'
  781.       OnClick = N21Click
  782.     end
  783.   end
  784.   object Timer1: TTimer
  785.     Interval = 10
  786.     OnTimer = Timer1Timer
  787.     Left = 232
  788.     Top = 224
  789.   end
  790. end
  791.