PC World 1999 May/PCWorld_1999-05_cd.bin/NOVINKY/SuperMem/SM98/SM98.EXE/0/RCDATA/TREGISTRYFORM/TREGISTRYFORM.txt

Text File | 1999-03-17 | 34.5 KB | 983 lines

object RegistryForm: TRegistryForm
  Left = 423
  Top = 168
  AutoScroll = False
  ClientHeight = 436
  ClientWidth = 807
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -15
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  PopupMenu = PopupMenu1
  Position = poDefault
  Scaled = False
  ShowHint = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  OnPaint = FormPaint
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 16
  object Splitter1: TSplitter
    Left = 185
    Top = 50
    Width = 6
    Height = 336
    Cursor = crHSplit
  end
  object SpeedBar: TPanel
    Left = 0
    Top = 0
    Width = 807
    Height = 25
    Align = alTop
    TabOrder = 2
    object ModeButton: TSpeedButton
      Left = 394
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Stretch or unstretch images'
      AllowAllUp = True
      GroupIndex = 1
      Glyph.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC00000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777770007777777777977777777770007777777777977777777770007777
        7777799977777777700077777777779777777777700077770000000000000777
        700077770222222222220777700077770E222222222E0777700077770EE22EE2
        22EE0777700077970EEE2EEEEEEE0797700079990EEEEEEEBBEE099970007797
        0EEEEEEBBBBE0797700077770EEEEEEBBBBE0777700077770EEEEEEEBBEE0777
        700077770EEEEEEEEEEE07777000777700000000000007777000777777777797
        7777777770007777777779997777777770007777777777977777777770007777
        77777797777777777000777777777777777777777000}
      OnClick = ModeButtonClick
    end
    object ViewButton: TSpeedButton
      Left = 78
      Top = 0
      Width = 25
      Height = 25
      Hint =
        'View the currently selected element using the selected registry ' +
        'member (or first element on the list if none selected)'
      Flat = True
      Glyph.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC00000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777778777787
        7777777870007878777777778778777770008787777777777777778780007778
        7777777777777777700078777777777777777777700087877777777777777777
        7000777777777777777777777000787777000007777777777000877700F88800
        07777777700077700F88088F000777777000770FFF80008FFF00007770007700
        FF80008FF0000077700077700F88088F000088887000777700F8880000888878
        0000777770000008888788800000777777777888788880000000770777877788
        8800000070007770000000000000007770007777770000000007777770007777
        77777777777777777000777777777777777777777000}
      OnClick = ViewButtonClick
    end
    object ExportButton: TSpeedButton
      Left = 423
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Export an object to a file '
      Glyph.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC00000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777770007777777777777777777770007777777777777777777770007777
        777777777777777770007778000000000000877770007770880888F770880777
        70007770880888F7708807777000777088078877708807777000777088800000
        0888077770007770888888888888077770007770880000000088077770007770
        80FFFFFFFF0807777000777080FFFFFFFF0807777000777080FFFFFFFF080777
        7000777080FFFFFFFF0807777000777000FFFFFFFF0007777000777080FFFFFF
        FF08077770007778000000000000877770007777777777777777777770007777
        77777777777777777000777777777777777777777000}
      OnClick = ExportButtonClick
    end
    object FontButton: TSpeedButton
      Left = 234
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Change font in the font registry'
      Enabled = False
      Flat = True
      Glyph.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC00000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777770007777777777777777777770007777777777777777777770007700
        7777777777777777700077007777777777777777700077007777777778087777
        7000770007777777770777777000770077777777770787777000770077777777
        7700077770007700007700777707877770007777777778077707787770007777
        7777770778000077700077777777770777777777700077777777700077777777
        7000777777777707777777777000777777777708777777777000777777777770
        0777777770007777777777777777777770007777777777777777777770007777
        77777777777777777000777777777777777777777000}
      OnClick = FontButtonClick
    end
    object GoToButton: TSpeedButton
      Left = 52
      Top = 0
      Width = 25
      Height = 25
      Hint =
        'Go to the currently selected element on the element list (or fir' +
        'st element if none selected)'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
        000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
        00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
        F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
        0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
        FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
        FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
        0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
        00333377737FFFFF773333303300000003333337337777777333}
      NumGlyphs = 2
      OnClick = ElementListBoxDblClick
    end
    object PathButton: TSpeedButton
      Left = 260
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Show the path to the currently selected object'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
        333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
        300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
        333337F373F773333333303330033333333337F3377333333333303333333333
        333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
        333337777F337F33333330330BB00333333337F373F773333333303330033333
        333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
        333377777F77377733330BBB0333333333337F337F33333333330BB003333333
        333373F773333333333330033333333333333773333333333333}
      NumGlyphs = 2
      OnClick = PathButtonClick
    end
    object RandomButton: TSpeedButton
      Left = 208
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Switch to a randomly selected item in the registry (F11)'
      Flat = True
      Glyph.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC00000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        777777777000777777777777777777777000770000000000000777777000770F
        FFFFFFFFFF0077777000770FF00FFF00FF0F07777000770FF00FFF00FF0FF077
        7000770FFFFFFFFFFF0F00777000770FF00FFF00FF0F00777000770FF00FFF00
        FF0F00777000770FFFFFFFFFFF0FF0777000770FF00FFF00FF0FF0777000770F
        F00FFF00FF00F0777000770FFFFFFFFFFF00F07770007700000000000000F077
        70007770FFFFFFFFFF0FF077700077770FFF000FFFF0F0777000777770FFFFFF
        FFFF007770007777770000000000007770007777777777777777777770007777
        77777777777777777000777777777777777777777000}
      OnClick = RandomButtonClick
    end
    object FindButton: TSpeedButton
      Left = 104
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Find substrings among registry members (Ctrl+S)'
      Flat = True
      Glyph.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC00000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777770007777777777777777777770007777777777777777777770007777
        7777777777777777700077700000777770000077700077707000777770700077
        7000777070007777707000777000777000000070000000777000777007000000
        700000777000777007000F00700000777000777007000F007000007770007777
        0000000000000777700077777070007070007777700077777000007000007777
        7000777777000777000777777000777777070777070777777000777777000777
        0007777770007777777777777777777770007777777777777777777770007777
        77777777777777777000777777777777777777777000}
      OnClick = MIFindAllClick
    end
    object ReplaceButton: TSpeedButton
      Left = 130
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Find and replace text in registry items (Ctrl+R)'
      Flat = True
      Glyph.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC00000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777077
        7777777770007777777700777777777770007777777000000007777770007777
        7777007777000777700077777777707777770077700077777777777777777007
        7000777777777777777777077000770000077777000007077000770700077777
        0700070070007707000777770700077070007700000007000000077070007700
        7000000700000770700077007000F00700000770700077007000F00700000770
        7000777000000000000077707000777707000707000777777000777700000700
        0007777770007777700077700077777770007777707077707077777770007777
        70007770007777777000777777777777777777777000}
      OnClick = MIReplaceClick
    end
    object TranscrButton: TSpeedButton
      Left = 286
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Insert a phonetic character at the current position'
      Enabled = False
      Flat = True
      Glyph.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC00000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFFF000FFFFFFFFFFFFFFFFFFFFF000FFFFFFFFFFFFFFFFFFFFF000FFFF
        FFFFFFFFFFFFFFFFF000FFFFFFFFFFFFFFFFFFFFF000FFFFFFFF0000FFFFFFFF
        F000FFFFFFFFFFF00FFFFFFFF000FFFFFFFFFFF00FFFFFFFF000FFF0000FFFF0
        0FF000FFF000FF00FF0FFFF0FF0FFF0FF000FF0FFF0FF00FFF00000FF000FF0F
        FF0FFF0FFFFFFF0FF000FF0FFF0FFFF0FF0FF00FF000FFF0000F00000FF000FF
        F000FFFFFF0FFFFFFFFFFFFFF000FFFFFF0FFFFFFFFFFFFFF000FFFFFF0FFFFF
        FFFFFFFFF000FFFFFFFFFFFFFFFFFFFFF000FFFFFFFFFFFFFFFFFFFFF000FFFF
        FFFFFFFFFFFFFFFFF000FFFFFFFFFFFFFFFFFFFFF000}
      OnClick = TranscrButtonClick
    end
    object PopUpButton: TSpeedButton
      Left = 0
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Open registry pop-up menu'
      Flat = True
      Glyph.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC00000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777770007F7F7F7F7F7F7F7F7F7F700077800000000007F7F7F770007F8F
        FFFFFFFF0F7F7F7F7000778F4444FFFF07F7F7F770007F8FFFFFFFFF0F7F7F7F
        700077844444444407F7F7F770007F8FFFFFFFFF0F7F7F7F7000778F44444FFF
        07F7F7F770007F8FFFFFFFFF0F7F7F7F7000778F4444FFFF07F7F7F770007F8F
        FFFFFFFF0F7F7F7F7000778F44444FFF07F7F7F770007F8FFFFFFFFF0F7F7F7F
        700078888888888880000008700078F44444FFFFFFFFFFF8700078F4FFF4F444
        FF444FF8700078F44444FFFFFFFFFFF870007888888888888888888870007F7F
        7F7F7F7F7F7F7F7F7000777777777777777777777000}
      OnClick = PopUpButtonClick
    end
    object SuperSet: TSpeedButton
      Left = 156
      Top = 0
      Width = 25
      Height = 25
      Hint = 'View the superset of the current registry subset'
      Flat = True
      Glyph.Data = {
        6E020000424D6E0200000000000076000000280000002A000000150000000100
        040000000000F801000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        77777777777777777777777777777700000077777777777777777777777777FF
        FFF77777FFFFF7000000777888887777788888777777788888F777788888F700
        000077783B387777783B38777777788788F777788788F70000007778B3B87777
        78B3B8777777787878F777787878F70000007778888877777888887777777888
        887FFFF888887700000077777877888887787777777777787788888778F77700
        0000777778778B3B87787777777777787787878778F7770000007777788883B3
        888877777777777888887888887777000000777777778B3B877777777777777F
        7787878F777777000000777747778888877777777777778F7788888777777700
        0000777447777787777777777777788F777F8FFF777777000000774447774444
        477777777777888F7788888F777777000000744447774919477777777778888F
        7787878F777777000000444447774191477777777788888F7788788F77777700
        0000744447774444477777777778888F77888887777777000000774447777777
        777777777777888F77777777777777000000777447777777777777777777788F
        7777777777777700000077774777777777777777777777877777777777777700
        0000777777777777777777777777777777777777777777000000777777777777
        777777777777777777777777777777000000}
      NumGlyphs = 2
      OnClick = SuperSetClick
    end
    object SubSet: TSpeedButton
      Left = 182
      Top = 0
      Width = 25
      Height = 25
      Hint = 'View the subsequent subset in registry subset hierarchy'
      Flat = True
      Glyph.Data = {
        6E020000424D6E0200000000000076000000280000002A000000150000000100
        040000000000F801000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777777777777770000007777777777777777777777777FFF
        FF77777FFFFF7700000077788888777778888877777788888F777788888F7700
        000077783B387777783B3877777788788F777788788F770000007778B3B87777
        78B3B877777787878F777787878F770000007778888877777888887777778888
        87FFFF88888777000000777778774444477877777777778F788888F78F777700
        0000777778774191477877777777778FF88788FF8F7777000000777778884919
        4888777777777788887878888777770000007777777741914777777777777777
        788788F7F77777000000777777774444477777777777777778888878FF777700
        0000777777777707774777777777777777F8FFF88FF777000000777777774444
        4744777777777777788888F888FF770000007777777749194744477777777777
        787878F8888FF70000007777777741914744447777777777788788F888887700
        0000777777774444474444477777777778888878888777000000777777777777
        7744447777777777777777788877770000007777777777777744477777777777
        7777777887777700000077777777777777447777777777777777777877777700
        0000777777777777774777777777777777777777777777000000777777777777
        777777777777777777777777777777000000}
      NumGlyphs = 2
      OnClick = SubSetClick
    end
    object Import: TSpeedButton
      Left = 364
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Import files to registry (e.g. bitmaps, wave files, etc.)'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      NumGlyphs = 2
      OnClick = MIImportFileClick
    end
    object ListButton: TSpeedButton
      Left = 26
      Top = 0
      Width = 25
      Height = 25
      Hint =
        'Show the list of elements that use the currently selected regist' +
        'ry member'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5555555FFFFFFFFFF5555550000000000555557777777777F5555550FFFFFFFF
        0555557F5FFFF557F5555550F0000FFF0555557F77775557F5555550FFFFFFFF
        0555557F5FFFFFF7F5555550F000000F0555557F77777757F5555550FFFFFFFF
        0555557F5FFFFFF7F5555550F000000F0555557F77777757F5555550FFFFFFFF
        0555557F5FFF5557F5555550F000FFFF0555557F77755FF7F5555550FFFFF000
        0555557F5FF5777755555550F00FF0F05555557F77557F7555555550FFFFF005
        5555557FFFFF7755555555500000005555555577777775555555555555555555
        5555555555555555555555555555555555555555555555555555}
      NumGlyphs = 2
      OnClick = ListClick
    end
    object BrowseBtn: TSpeedButton
      Left = 338
      Top = 0
      Width = 25
      Height = 25
      Hint =
        'Feed all elements that use the selected registry member into a b' +
        'rowser'
      Flat = True
      Glyph.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC00000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666600000000
        06666666600066660F666666066666666000660000000006066666666000660F
        6666660606666666600000000000060F0666666660000F666666060C06666666
        60000F6666660F000666666660000F6666660C066666666660000FFFFFFF0006
        6666666660000CCCCCCC0666660000066000000000000666660AAA0660006666
        6666666660000006600066666666666606666666600066666660000066000006
        600066666660FFF0000BBB066000666666600000660000066000666666666666
        0666666660006666666666666000000660006666666666666609990660006666
        66666666660000066000666666666666666666666000}
      OnClick = MemberListBoxDblClick
    end
    object SwitchRegistry: TSpeedButton
      Left = 312
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Switch to the twin registry'
      Flat = True
      Glyph.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC00000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777770007777777777777777777770007777777777777777777770007777
        7777777777777777700077777777777777744777700077777777777777777487
        7000774444444477777777487000774444444777777777747000774444447777
        7777777470007744444777777777777470007744444777777777777470007744
        4744777777777774700077447774477777777748700077477777447777777847
        7000777777777748888884777000777777777774444447777000777777777777
        7777777770007777777777777777777770007777777777777777777770007777
        77777777777777777000777777777777777777777000}
      OnClick = SwitchRegistryClick
    end
    object MediaPlayer1: TMediaPlayer
      Left = 455
      Top = 0
      Width = 85
      Height = 25
      Hint = 'Play, pause, rewind, record or save the current sound'
      Enabled = False
      VisibleButtons = [btPlay, btPause, btPrev]
      Display = RightPanel
      Visible = False
      TabOrder = 0
    end
  end
  object ButtonPanel: TPanel
    Left = 0
    Top = 406
    Width = 807
    Height = 30
    Align = alBottom
    TabOrder = 1
    object Delete: TButton
      Left = 480
      Top = 2
      Width = 80
      Height = 27
      Hint =
        'Delete the currently selected registry member and its object (if' +
        ' any)'
      Caption = '&Delete'
      TabOrder = 2
      TabStop = False
      OnClick = DeleteClick
    end
    object Link: TButton
      Left = 240
      Top = 2
      Width = 80
      Height = 27
      Hint = 'Link the selected registry member with the requesting source'
      Caption = '&Link'
      TabOrder = 5
      TabStop = False
      OnClick = LinkClick
    end
    object Rename: TButton
      Left = 400
      Top = 2
      Width = 80
      Height = 27
      Hint = 'Rename the currently selected registry member'
      Caption = '&Rename'
      TabOrder = 3
      TabStop = False
      OnClick = RenameClick
    end
    object List: TButton
      Left = 0
      Top = 2
      Width = 80
      Height = 27
      Hint =
        'Show the list of elements that use the currently selected regist' +
        'ry member'
      Caption = '&List'
      Default = True
      TabOrder = 0
      TabStop = False
      OnClick = ListClick
    end
    object Browse: TButton
      Left = 160
      Top = 2
      Width = 80
      Height = 27
      Hint = 'Browse elements that use the selected registry member'
      Caption = '&Browse'
      TabOrder = 1
      TabStop = False
      OnClick = MIBrowseSelectedClick
    end
    object Add: TButton
      Left = 320
      Top = 2
      Width = 80
      Height = 27
      Hint = 'Add a new registry member'
      Caption = '&Add'
      TabOrder = 4
      OnClick = AddClick
    end
    object Go: TButton
      Left = 80
      Top = 2
      Width = 80
      Height = 27
      Hint =
        'Go to the first element using the currently selected registry me' +
        'mber'
      Caption = '&Go to'
      TabOrder = 6
      OnClick = ElementListBoxDblClick
    end
  end
  object RightPanel: TPanel
    Left = 191
    Top = 50
    Width = 616
    Height = 336
    Align = alClient
    ParentColor = True
    TabOrder = 0
    OnClick = RightPanelClick
    OnResize = RightPanelResize
    object Splitter2: TSplitter
      Left = 1
      Top = 159
      Width = 614
      Height = 6
      Cursor = crVSplit
      Align = alBottom
    end
    object ElementListBox: TCheckListBox
      Left = 1
      Top = 165
      Width = 614
      Height = 170
      Align = alBottom
      ItemHeight = 16
      TabOrder = 0
      OnDblClick = ElementListBoxDblClick
      OnKeyDown = ElementListBoxKeyDown
      OnMouseUp = ElementListBoxMouseUp
    end
  end
  object PathPanel: TPanel
    Left = 0
    Top = 386
    Width = 807
    Height = 20
    Hint =
      'Number of elements using the selected registry member and the pa' +
      'th to the registry object associated with the member (if any)'
    Align = alBottom
    TabOrder = 3
    object PathLabel: TPanel
      Left = 321
      Top = 1
      Width = 485
      Height = 18
      Hint = 'Path to the object associated with the registry in the filespace'
      Align = alClient
      Alignment = taLeftJustify
      BevelOuter = bvLowered
      TabOrder = 0
    end
    object SlotLabel: TPanel
      Left = 241
      Top = 1
      Width = 80
      Height = 18
      Hint = 'Filespace slot used by the member (if any)'
      Align = alLeft
      BevelOuter = bvLowered
      Caption = '0'
      TabOrder = 1
    end
    object PositLabel: TPanel
      Left = 161
      Top = 1
      Width = 80
      Height = 18
      Hint = 'Member'#39's physical position in the registry'
      Align = alLeft
      BevelOuter = bvLowered
      Caption = '0'
      TabOrder = 2
    end
    object UserLabel: TPanel
      Left = 81
      Top = 1
      Width = 80
      Height = 18
      Hint = 'Number of users of the member (enumerated with List)'
      Align = alLeft
      BevelOuter = bvLowered
      Caption = '0'
      TabOrder = 3
    end
    object IndexLabel: TPanel
      Left = 1
      Top = 1
      Width = 80
      Height = 18
      Hint = 'Member'#39's current index (i.e. position in sorted registry)'
      Align = alLeft
      BevelOuter = bvLowered
      Caption = '0'
      TabOrder = 4
    end
  end
  object ComboPanel: TPanel
    Left = 0
    Top = 25
    Width = 807
    Height = 25
    Align = alTop
    TabOrder = 4
    OnResize = ComboPanelResize
    object ComboBox1: TComboBox
      Left = 64
      Top = 0
      Width = 497
      Height = 24
      DropDownCount = 21
      ItemHeight = 16
      TabOrder = 0
      OnChange = ComboBox1Change
      OnKeyDown = ComboBox1KeyDown
    end
  end
  object MemberPanel: TPanel
    Left = 0
    Top = 50
    Width = 185
    Height = 336
    Align = alLeft
    TabOrder = 5
    object ScrollPanel: TPanel
      Left = 166
      Top = 1
      Width = 18
      Height = 334
      Align = alRight
      Caption = 'ScrollPanel'
      TabOrder = 0
      OnResize = ScrollPanelResize
      object ScrollBar1: TScrollBar
        Left = -3
        Top = 12
        Width = 18
        Height = 297
        Kind = sbVertical
        PageSize = 0
        TabOrder = 0
        TabStop = False
        OnScroll = ScrollBar1Scroll
      end
    end
    object MemberListBox: TCheckListBox
      Left = 1
      Top = 1
      Width = 165
      Height = 334
      Align = alClient
      ItemHeight = 16
      TabOrder = 1
      OnClick = MemberListBoxClick
      OnDblClick = MemberListBoxDblClick
      OnKeyDown = MemberListBoxKeyDown
      OnKeyPress = MemberListBoxKeyPress
    end
  end
  object SaveDialog1: TSaveDialog
    Left = 672
    Top = 408
  end
  object FindDialog1: TFindDialog
    OnFind = FindDialog1Find
    Left = 608
    Top = 408
  end
  object PopupMenu1: TPopupMenu
    OnPopup = PopupMenu1Popup
    Left = 16
    Top = 32
    object MIViewMenu: TMenuItem
      Caption = '&View'
      Hint = 'Options for viewing elements and lists of elements '
      object MIListUsers: TMenuItem
        Caption = '&List elements'
        Hint = 'List all elements using the current member'
        OnClick = ListClick
      end
      object MIView: TMenuItem
        Caption = '&View element'
        Hint = 'View the element'
        OnClick = ViewButtonClick
      end
      object MIGoTo: TMenuItem
        Caption = '&Go to element'
        Hint = 'Go to the selected element'
        OnClick = ElementListBoxDblClick
      end
      object MIRandomPick: TMenuItem
        Caption = '&Random pick'
        Hint = 'Choose a new randomly selected item '
        ShortCut = 122
        OnClick = RandomButtonClick
      end
      object MIClear: TMenuItem
        Caption = '&Clear'
        Hint = 'Clear the combo box or exit if cleared'
        ShortCut = 27
        OnClick = ClearClick
      end
    end
    object MIEditMenu: TMenuItem
      Caption = '&Edit'
      Hint = 'Editing options'
      OnClick = MIEditMenuClick
      object MIEditText: TMenuItem
        Caption = '&Edit text'
        Hint = 'Edit the name of the registry member'
        ShortCut = 16453
        OnClick = MIEditTextClick
      end
      object MIEditTranslation: TMenuItem
        Caption = 'Edit &translation'
        Hint = 'Edit the translation field (if translation registry exists)'
        ShortCut = 16468
        OnClick = MIEditTranslationClick
      end
      object MICopyPath: TMenuItem
        Caption = '&Copy path'
        Hint =
          'Copy the path to the registry member object file to the clipboar' +
          'd'
        OnClick = MICopyPathClick
      end
      object MIOverwrite: TMenuItem
        Caption = '&Overwrite file'
        Hint = 'Overwrite the current object file with another file'
        OnClick = MIOverwriteClick
      end
    end
    object MISearch: TMenuItem
      Caption = '&Search and replace'
      Hint =
        'Options for search registry for substrings (and replacing string' +
        's)'
      object MIFindAll: TMenuItem
        Caption = '&Find...'
        Hint = 'Find registry members containing a given substring'
        ShortCut = 16467
        OnClick = MIFindAllClick
      end
      object MIFindFirst: TMenuItem
        Caption = 'Find first...'
        Hint =
          'Find the first substring occurrence after the currently selected' +
          ' registry member'
        ShortCut = 16454
        OnClick = MIFindFirstClick
      end
      object MIFindNext: TMenuItem
        Caption = 'Find &next'
        Hint = 'Repeat last search'
        ShortCut = 114
        OnClick = MIFindNextClick
      end
      object N10: TMenuItem
        Caption = '-'
      end
      object MIReplace: TMenuItem
        Caption = 'Find and &replace...'
        Hint = 'Find text and replace it with another'
        ShortCut = 16466
        OnClick = MIReplaceClick
      end
      object MIApplyFilter: TMenuItem
        Caption = '&Apply filter...'
        Hint = 'Replace texts in the registry by using a filter file (FLT)'
        OnClick = MIApplyFilterClick
      end
    end
    object MIFirstHyphen: TMenuItem
      Caption = '-'
    end
    object MIBrowseSelected: TMenuItem
      Caption = '&Browse current'
      Hint =
        'Open a browser with all elements using currently selected regist' +
        'ry member'
      ShortCut = 16450
      OnClick = MIBrowseSelectedClick
    end
    object MIBrowseAll: TMenuItem
      Caption = 'Browse &all'
      Hint =
        'Open a browser with all elements using displayed registry member' +
        's'
      ShortCut = 24642
      OnClick = MIBrowseAllClick
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object MIImportFile: TMenuItem
      Caption = '&Import files...'
      Hint = 'Import files to registry (e.g. bitmaps, AVI files, etc.)'
      OnClick = MIImportFileClick
    end
    object MIExportText: TMenuItem
      Caption = 'Export as text...'
      Hint = 'Export registry members into a text file '
      OnClick = MIExportTextClick
    end
    object MIImportText: TMenuItem
      Caption = 'Import text...'
      Hint =
        'Imports a previously exported text file (e.g. after spellcheckin' +
        'g)'
      OnClick = MIImportTextClick
    end
    object N9: TMenuItem
      Caption = '-'
    end
    object MITools: TMenuItem
      Caption = '&Tools'
      Hint = 'Advanced registry tools'
      object MIPlay: TMenuItem
        Caption = 'Play'
        Enabled = False
        Hint = 'Play the player'
        ShortCut = 16505
        OnClick = MIPlayClick
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object MISort: TMenuItem
        Caption = 'Sort for frequency...'
        Hint =
          'Sort registry for member use frequency (most often used members ' +
          'first)'
        OnClick = MISortClick
      end
      object MISortPriority: TMenuItem
        Caption = 'Sort for priority...'
        Hint =
          'Sort registry for member priority (members with highest ordinal ' +
          'average first)'
        OnClick = MISortPriorityClick
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object MIInternalize: TMenuItem
        Caption = 'Internalize files...'
        Hint =
          'Integrate all external files or SuperMemo 7 files into the files' +
          'pace (i.e. ELEMENTS directory)'
        OnClick = MIInternalizeClick
      end
      object MIRecover: TMenuItem
        Caption = 'Recover'
        Hint = 'Recover linked registries (e.g. transcription registry)'
        OnClick = MIRecoverClick
      end
      object MIComputeSize: TMenuItem
        Caption = 'Compute files size...'
        Hint =
          'Compute the total size of registry object files (stored in ELEME' +
          'NTS directory)'
        OnClick = MIComputeSizeClick
      end
      object N8: TMenuItem
        Caption = '-'
      end
      object MIMatchToSubset: TMenuItem
        Caption = '&Match to subset...'
        Hint = 'Find registry members whose users belong to an element subset'
        OnClick = MIMatchToSubsetClick
      end
      object MISelectUntranslated: TMenuItem
        Caption = 'Select untranslated...'
        Enabled = False
        Hint = 'Select all text entries that have not been translated'
        OnClick = MISelectUntranslatedClick
      end
    end
    object Subset1: TMenuItem
      Caption = 'Subset'
      object MIPreviousSubset: TMenuItem
        Caption = 'Previous subset'
        Hint = 'Open the superset of the current registry subset'
        ShortCut = 49189
        OnClick = SuperSetClick
      end
      object MINextSubset: TMenuItem
        Caption = 'Next subset'
        Hint = 'Move to the next registry subset in the subset hierarchy'
        ShortCut = 49191
        OnClick = SubSetClick
      end
      object MIDeleteSubset: TMenuItem
        Caption = 'Delete subset...'
        Hint = 'Delete the currently selected registry subset'
        OnClick = MIDeleteSubsetClick
      end
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object MIClose: TMenuItem
      Caption = '&Close'
      Hint = 'Close the registry window'
      ShortCut = 16499
      OnClick = MICloseClick
    end
    object N1: TMenuItem
      Caption = '-'
      Visible = False
    end
    object InvAdd1: TMenuItem
      Caption = 'Inv: Add'
      ShortCut = 32833
      Visible = False
      OnClick = AddClick
    end
    object InvBrowse1: TMenuItem
      Caption = 'Inv: Browse'
      ShortCut = 32834
      Visible = False
      OnClick = MIBrowseAllClick
    end
  end
  object ReplaceDialog1: TReplaceDialog
    Options = [frDown, frHideUpDown, frDisableUpDown, frShowHelp]
    OnFind = ReplaceDialog1Find
    OnReplace = ReplaceDialog1Replace
    Left = 640
    Top = 408
  end
end