Chip Hitware 7/Chip_Hitware_Vol_07.iso/chiphit7/multmedi/vidfun/vidfun.exe/W95FUN20.DLL/RCDATA/TEDITORFORM/TEDITORFORM.txt

Text File | 1996-10-30 | 22.8 KB | 886 lines

object EditorForm: TEditorForm
  Left = 184
  Top = 187
  ActiveControl = Grid
  BorderStyle = bsDialog
  Caption = 'VidFun Slideshow Editor'
  ClientHeight = 512
  ClientWidth = 722
  Font.Color = clBlack
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  Icon.Data = {<image000.ico>}
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 120
  TextHeight = 16
  object Grid: TStringGrid
    Left = 0
    Top = 30
    Width = 722
    Height = 404
    Align = alTop
    ColCount = 13
    DefaultColWidth = 40
    FixedCols = 4
    RowCount = 2
    TabOrder = 9
    OnClick = GridClick
    OnDblClick = GridDblClick
    OnKeyPress = GridKeyPress
    OnMouseUp = GridMouseUp
    OnRowMoved = GridRowMoved
  end
  object BtnAdd: TBitBtn
    Left = 148
    Top = 441
    Width = 114
    Height = 33
    Caption = '&Add Slides'
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    OnClick = BtnAddClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      33333333FF33333333FF333993333333300033377F3333333777333993333333
      300033F77FFF3333377739999993333333333777777F3333333F399999933333
      33003777777333333377333993333333330033377F3333333377333993333333
      3333333773333333333F333333333333330033333333F33333773333333C3333
      330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
      993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
      333333333337733333FF3333333C333330003333333733333777333333333333
      3000333333333333377733333333333333333333333333333333}
    NumGlyphs = 2
    Style = bsNew
  end
  object Fullname: TPanel
    Left = 0
    Top = 0
    Width = 722
    Height = 30
    Align = alTop
    BevelOuter = bvLowered
    BevelWidth = 2
    Caption = 'Slide Pathname: <blank>'
    Color = clWhite
    TabOrder = 10
    object Gauge: TGauge
      Left = 2
      Top = 2
      Width = 718
      Height = 26
      Align = alClient
      ForeColor = clBtnFace
      BackColor = clScrollBar
      Progress = 0
      Visible = False
    end
  end
  object BtnSave: TBitBtn
    Left = 514
    Top = 475
    Width = 85
    Height = 32
    Caption = '&Save'
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 6
    OnClick = BtnSaveClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888808
      88888888888888908888888888888899088800000099999990880FFFF0999999
      99080FFFF099999999900F00F099999999080FFFF099999990880F00FFFFF099
      08880FFFFFFFF09088880F00F000000888880FFFF0FF088888880F08F0F08888
      88880FFFF0088888888800000088888888888888888888888888}
    Style = bsNew
  end
  object Panel1: TPanel
    Left = 0
    Top = 434
    Width = 114
    Height = 78
    Align = alLeft
    TabOrder = 11
    object ColorLabel: TLabel
      Left = 1
      Top = 1
      Width = 112
      Height = 16
      Align = alTop
      Alignment = taCenter
      AutoSize = False
      Caption = 'No Bkgnd'
    end
    object ColorPanel: TPanel
      Left = 7
      Top = 22
      Width = 100
      Height = 54
      TabOrder = 0
    end
  end
  object BtnLoad: TBitBtn
    Left = 514
    Top = 441
    Width = 85
    Height = 32
    Caption = '&Open'
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 4
    OnClick = BtnLoadClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      777777777777777777777000000000000077007B7B7B7B7B70770F07B7B7B7B7
      B7070B0B7B7B7B7B7B070FB0B7B7B7B7B7B00BF07B7B7B7B7B700FBF000007B7
      B7B00BFBFBFBF00000000FBFBFBFBFBF07770BFBFBFBFBFB07770FBFBF000000
      0777700000777777777777777777777777777777777777777777}
    Style = bsNew
  end
  object BtnNew: TBitBtn
    Left = 426
    Top = 441
    Width = 85
    Height = 32
    Caption = '&New'
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
    OnClick = BtnNewClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
      333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
      0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
      0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
      33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
      B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
      3BB33773333773333773B333333B3333333B7333333733333337}
    NumGlyphs = 2
    Style = bsNew
  end
  object BtnDelete: TBitBtn
    Left = 148
    Top = 475
    Width = 114
    Height = 33
    Caption = '&Kill Slide'
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    OnClick = BtnDeleteClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333FF3333333333333003333333333333377F33333333333307
      733333FFF333337773333C003333307733333777FF333777FFFFC0CC03330770
      000077777FF377777777C033C03077FFFFF077FF77F777FFFFF7CC00000F7777
      777077777777777777773CCCCC00000000003777777777777777333330030FFF
      FFF03333F77F7F3FF3F7333C0C030F00F0F03337777F7F77373733C03C030FFF
      FFF03377F77F7F3F333733C03C030F0FFFF03377F7737F733FF733C000330FFF
      0000337777F37F3F7777333CCC330F0F0FF0333777337F737F37333333330FFF
      0F03333333337FFF7F7333333333000000333333333377777733}
    NumGlyphs = 2
    Style = bsNew
  end
  object BtnTest: TBitBtn
    Left = 426
    Top = 475
    Width = 85
    Height = 32
    Caption = '&Test'
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 5
    OnClick = BtnTestClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      0000377777777777777703030303030303037F7F7F7F7F7F7F7F000000000000
      00007777777777777777933393303933337073F37F37F73F3377393393303393
      379037FF7F37F37FF777379793303379793037777337F3777737339933303339
      93303377F3F7F3F77F3733993930393993303377F737F7377FF7399993303399
      999037777337F377777793993330333393307377FF37F3337FF7333993303333
      993033377F37F33377F7333993303333993033377337F3337737333333303333
      33303FFFFFF7FFFFFFF700000000000000007777777777777777030303030303
      03037F7F7F7F7F7F7F7F000000000000000077777777777777770000}
    NumGlyphs = 2
    Style = bsNew
  end
  object BtnQuit: TBitBtn
    Left = 603
    Top = 475
    Width = 85
    Height = 32
    Cancel = True
    Caption = '&Close'
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ModalResult = 2
    ParentFont = False
    TabOrder = 8
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000000000000000000000000000008000
      00000080000080800000000080008000800000808000C0C0C00080808000FF00
      000000FF0000FFFF00000000FF00FF00FF0000FFFF00FFFFFF00666666666666
      66666666666666666666666886666866666666408866088666666644088C4088
      666666C440C44406666666C4444440666666666C4444066666666666C4448866
      66666666C44408866666666644C440886666666C406C4408866666644866C440
      6666666CC6666C46666666666666666666666666666666666666}
    Style = bsNew
  end
  object BtnHelp: TBitBtn
    Left = 603
    Top = 441
    Width = 85
    Height = 33
    Caption = '&Help'
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 7
    OnClick = BtnHelpClick
    Glyph.Data = {
      F6000000424DF60000000000000076000000280000000C000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333366333333
      00003336446333330000333E6643333300003333E66333330000333333333333
      000033334463333300003336664333330000333E6664333300003333E6664333
      000033333E6664330000344333E6664300006664333E66430000E66644466643
      00003E6666666663000033EE6666663300003333EEEEE3330000}
    Style = bsNew
  end
  object BtnCD: TBitBtn
    Left = 266
    Top = 475
    Width = 114
    Height = 33
    Caption = 'C&D track'
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    OnClick = BtnCDClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333FFFFF3333333333000003333333333F777773FF333333008F88800
      33333337733333773F33330FFF8F888F033333733333333373F330DEFFF8F8FE
      D03337F33333333337F330DDEFFFFFEDD0333733333FFF33373F0BBFDE000EDF
      BB037F33337773F3337F0AABB08880BBAA037F3337F3F7F3337F0EEAA08080AA
      EE037F3337F737F3337F0AABB08880BBAA037F33373FF733337F0BBFDE000EDB
      BB0373F333777333337330DDEFFFFFEDD03337F33333333337F330DEF8F8FFFE
      D033373F333333333733330FFF8F8FFF03333373FF33333F733333300FF8F800
      3333333773FFFF773333333330000033333333333777773333330000}
    NumGlyphs = 2
    Style = bsNew
  end
  object BtnGlobal: TBitBtn
    Left = 266
    Top = 441
    Width = 114
    Height = 33
    Caption = '&Global'
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 12
    OnClick = BtnGlobalClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      5555555555FFFFF555555555544C4C5555555555F777775FF5555554C444C444
      5555555775FF55775F55554C4334444445555575577F55557FF554C4C334C4C4
      335557F5577FF55577F554CCC3334444335557555777F555775FCCCCC333CCC4
      C4457F55F777F555557F4CC33333CCC444C57F577777F5F5557FC4333333C3C4
      CCC57F777777F7FF557F4CC33333333C4C457F577777777F557FCCC33CC4333C
      C4C575F7755F777FF5755CCCCC3333334C5557F5FF777777F7F554C333333333
      CC55575777777777F755553333CC3C33C555557777557577755555533CC4C4CC
      5555555775FFFF77555555555C4CCC55555555555777775555550000}
    NumGlyphs = 2
    Style = bsNew
  end
  object mnuFX: TPopupMenu
    Alignment = paCenter
    AutoPopup = False
    Left = 14
    Top = 208
    object fx0: TMenuItem
      Caption = 'none'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx1: TMenuItem
      Caption = 'Wipe Dn'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx2: TMenuItem
      Caption = 'Wipe Up'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx3: TMenuItem
      Caption = 'Wipe Rt'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx4: TMenuItem
      Caption = 'Wipe Lf'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx5: TMenuItem
      Caption = 'Rnd Pix'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx6: TMenuItem
      Caption = 'Rnd SmlBox'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx7: TMenuItem
      Caption = 'Rnd MedBox'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx8: TMenuItem
      Caption = 'Rnd LgBox'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx9: TMenuItem
      Caption = 'Rnd HorzLines'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx10: TMenuItem
      Caption = 'Rnd VertLines'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx11: TMenuItem
      Caption = 'Out VertLines'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx12: TMenuItem
      Caption = 'Out HorzLines'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx13: TMenuItem
      Caption = 'Horz Interlace'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx14: TMenuItem
      Caption = 'Vert Interlace'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx15: TMenuItem
      Break = mbBarBreak
      Caption = 'OutToIn'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx16: TMenuItem
      Caption = 'InToOut'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx17: TMenuItem
      Caption = 'InToOut Lace'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx18: TMenuItem
      Caption = 'OutToIn Lace'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx19: TMenuItem
      Caption = 'Spiral In'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx20: TMenuItem
      Caption = 'Spiral Out'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx21: TMenuItem
      Caption = 'In HorzLines'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx22: TMenuItem
      Caption = 'In VertLines'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx23: TMenuItem
      Caption = 'Vert Lace In'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx24: TMenuItem
      Caption = 'Horz Lace In'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx25: TMenuItem
      Caption = 'Interlace Rt'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx26: TMenuItem
      Caption = 'Interlace Lf'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx27: TMenuItem
      Caption = 'Interlace Up'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx28: TMenuItem
      Caption = 'Interlace Dn'
      ShortCut = 0
      OnClick = fx1Click
    end
    object fx29: TMenuItem
      Caption = 'Random FX'
      ShortCut = 0
      OnClick = fx1Click
    end
  end
  object mnuWait: TPopupMenu
    Alignment = paCenter
    Left = 80
    Top = 208
    object wait0: TMenuItem
      Caption = 'none'
      ShortCut = 0
      OnClick = waitUserClick
    end
    object wait1: TMenuItem
      Tag = 1
      Caption = '1 second'
      ShortCut = 0
      OnClick = waitUserClick
    end
    object wait2: TMenuItem
      Tag = 2
      Caption = '2 seconds'
      ShortCut = 0
      OnClick = waitUserClick
    end
    object wait5: TMenuItem
      Tag = 5
      Caption = '5 seconds'
      ShortCut = 0
      OnClick = waitUserClick
    end
    object wait10: TMenuItem
      Tag = 10
      Caption = '10 seconds'
      ShortCut = 0
      OnClick = waitUserClick
    end
    object wait20: TMenuItem
      Tag = 20
      Caption = '20 seconds'
      ShortCut = 0
      OnClick = waitUserClick
    end
    object wait30: TMenuItem
      Tag = 30
      Caption = '30 seconds'
      ShortCut = 0
      OnClick = waitUserClick
    end
    object wait60: TMenuItem
      Tag = 60
      Break = mbBarBreak
      Caption = '1 minute'
      ShortCut = 0
      OnClick = waitUserClick
    end
    object wait120: TMenuItem
      Tag = 120
      Caption = '2 minutes'
      ShortCut = 0
      OnClick = waitUserClick
    end
    object N10minutes1: TMenuItem
      Tag = 180
      Caption = '3 minutes'
      ShortCut = 0
      OnClick = waitUserClick
    end
    object wait300: TMenuItem
      Tag = 300
      Caption = '5 minutes'
      ShortCut = 0
      OnClick = waitUserClick
    end
    object waitX: TMenuItem
      Caption = 'User'
      ShortCut = 0
      OnClick = waitXClick
    end
  end
  object mnuVPOS: TPopupMenu
    Alignment = paCenter
    Left = 150
    Top = 210
    object vpos0: TMenuItem
      Caption = 'Top'
      ShortCut = 0
      OnClick = vpos0Click
    end
    object vpos1: TMenuItem
      Caption = 'Mid'
      ShortCut = 0
      OnClick = vpos0Click
    end
    object vposX: TMenuItem
      Caption = '&User'
      ShortCut = 0
      OnClick = vposXClick
    end
  end
  object mnuHPOS: TPopupMenu
    Alignment = paCenter
    Left = 116
    Top = 208
    object hpos0: TMenuItem
      Caption = 'Left'
      ShortCut = 0
      OnClick = hpos0Click
    end
    object hpos1: TMenuItem
      Caption = 'Mid'
      ShortCut = 0
      OnClick = hpos0Click
    end
    object hposX: TMenuItem
      Caption = '&User'
      ShortCut = 0
      OnClick = hposXClick
    end
  end
  object mnuSIZE: TPopupMenu
    Alignment = paCenter
    Left = 184
    Top = 208
    object sz50: TMenuItem
      Tag = 50
      Caption = '50%'
      ShortCut = 0
      OnClick = sz0Click
    end
    object sz0: TMenuItem
      Tag = 100
      Caption = '100%'
      ShortCut = 0
      OnClick = sz0Click
    end
    object sz200: TMenuItem
      Tag = 200
      Caption = '200%'
      ShortCut = 0
      OnClick = sz0Click
    end
    object sz300: TMenuItem
      Tag = 300
      Caption = '300%'
      ShortCut = 0
      OnClick = sz0Click
    end
    object sz400: TMenuItem
      Tag = 400
      Caption = '400%'
      ShortCut = 0
      OnClick = sz0Click
    end
    object szX: TMenuItem
      Caption = '&User'
      ShortCut = 0
      OnClick = szXClick
    end
  end
  object mnuVOL: TPopupMenu
    Alignment = paCenter
    Left = 216
    Top = 208
    object vol0: TMenuItem
      Caption = 'Off'
      ShortCut = 0
      OnClick = vol0Click
    end
    object vol50: TMenuItem
      Tag = 50
      Caption = '50%'
      ShortCut = 0
      OnClick = vol0Click
    end
    object vol75: TMenuItem
      Tag = 75
      Caption = '75%'
      ShortCut = 0
      OnClick = vol0Click
    end
    object vol100: TMenuItem
      Tag = 100
      Caption = '100%'
      ShortCut = 0
      OnClick = vol0Click
    end
    object volX: TMenuItem
      Caption = '&User'
      ShortCut = 0
      OnClick = volXClick
    end
  end
  object mnuSPD: TPopupMenu
    Alignment = paCenter
    Left = 248
    Top = 206
    object spd50: TMenuItem
      Tag = 50
      Caption = '50%'
      ShortCut = 0
      OnClick = spd0Click
    end
    object spd0: TMenuItem
      Tag = 100
      Caption = '100%'
      ShortCut = 0
      OnClick = spd0Click
    end
    object spd150: TMenuItem
      Tag = 150
      Caption = '150%'
      ShortCut = 0
      OnClick = spd0Click
    end
    object spd200: TMenuItem
      Tag = 200
      Caption = '200%'
      ShortCut = 0
      OnClick = spd0Click
    end
    object spdX: TMenuItem
      Caption = '&User'
      ShortCut = 0
      OnClick = spdXClick
    end
  end
  object ColorDialog1: TColorDialog
    Ctl3D = True
    Left = 8
    Top = 168
  end
  object mnuColor: TPopupMenu
    Alignment = paCenter
    Left = 278
    Top = 206
    object clr0: TMenuItem
      Tag = -1
      Caption = 'none'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrBlk: TMenuItem
      Caption = 'Black'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrNavy: TMenuItem
      Tag = 1
      Caption = 'Navy Blue'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrGrn: TMenuItem
      Tag = 2
      Caption = 'Green'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrTeal: TMenuItem
      Tag = 3
      Caption = 'Teal'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrMaroon: TMenuItem
      Tag = 4
      Caption = 'Maroon'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrPurple: TMenuItem
      Tag = 5
      Caption = 'Purple'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrOlive: TMenuItem
      Tag = 6
      Caption = 'Olive'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrSilver: TMenuItem
      Tag = 8
      Caption = 'Silver'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrUser: TMenuItem
      Tag = 255
      Break = mbBarBreak
      Caption = '&User Color'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrGray: TMenuItem
      Tag = 7
      Caption = 'Gray'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrBlue: TMenuItem
      Tag = 9
      Caption = 'Blue'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrLime: TMenuItem
      Tag = 10
      Caption = 'Lime'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrAqua: TMenuItem
      Tag = 11
      Caption = 'Aqua'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrRed: TMenuItem
      Tag = 12
      Caption = 'Red'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrFuchsia: TMenuItem
      Tag = 13
      Caption = 'Fuchsia'
      ShortCut = 0
      OnClick = clr0Click
    end
    object Yellow1: TMenuItem
      Tag = 14
      Caption = 'Yellow'
      ShortCut = 0
      OnClick = clr0Click
    end
    object clrWht: TMenuItem
      Tag = 15
      Caption = 'White'
      ShortCut = 0
      OnClick = clr0Click
    end
  end
  object mnuFLI: TPopupMenu
    Alignment = paCenter
    Left = 48
    Top = 208
    object Loop1: TMenuItem
      Caption = 'Loop 1x'
      ShortCut = 0
      OnClick = Loop1Click
    end
    object Loop2: TMenuItem
      Caption = 'Loop 2x'
      ShortCut = 0
      OnClick = Loop1Click
    end
    object loop3: TMenuItem
      Caption = 'Loop 3x'
      ShortCut = 0
      OnClick = Loop1Click
    end
    object Loop4x: TMenuItem
      Caption = 'Loop 4x'
      ShortCut = 0
      OnClick = Loop1Click
    end
    object LoopX: TMenuItem
      Caption = 'Loop N times'
      ShortCut = 0
      OnClick = LoopXClick
    end
  end
end