home *** CD-ROM | disk | FTP | other *** search
Text File | 1997-02-01 | 37.1 KB | 1,115 lines |
- object frmClipMate: TfrmClipMate
- Left = 750
- Top = 0
- HelpContext = 12
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = 'ClipMate 4.2'
- ClientHeight = 57
- ClientWidth = 264
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- Menu = MainMenu1
- Position = poDefaultPosOnly
- Scaled = False
- ShowHint = True
- Visible = True
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnKeyUp = FormKeyUp
- PixelsPerInch = 96
- TextHeight = 16
- object ImgOffscreen: TImage
- Left = 2
- Top = 61
- Width = 59
- Height = 28
- Enabled = False
- end
- object imgCF_TEXT: TImage
- Left = 4
- Top = 200
- Width = 25
- Height = 21
- Picture.Data = {<image001.bmp>}
- end
- object imgCF_RTF: TImage
- Left = 4
- Top = 224
- Width = 25
- Height = 21
- Picture.Data = {<image002.bmp>}
- end
- object imgCF_OLE: TImage
- Left = 4
- Top = 248
- Width = 25
- Height = 21
- Picture.Data = {<image003.bmp>}
- end
- object imgCF_WMF: TImage
- Left = 40
- Top = 200
- Width = 25
- Height = 21
- Picture.Data = {<image004.bmp>}
- end
- object imgCF_BITMAP: TImage
- Left = 40
- Top = 224
- Width = 25
- Height = 21
- Picture.Data = {<image005.bmp>}
- end
- object imgCF_UNKNOWN: TImage
- Left = 40
- Top = 248
- Width = 25
- Height = 21
- Picture.Data = {<image006.bmp>}
- end
- object pnlToolbar: TPanel
- Left = 0
- Top = 0
- Width = 264
- Height = 57
- Align = alTop
- BevelOuter = bvLowered
- Ctl3D = True
- ParentCtl3D = False
- PopupMenu = PopMenuWhatsThis
- TabOrder = 0
- OnResize = pnlToolbarResize
- object cmdErase: TSpeedButton
- Tag = 248
- Left = 21
- Top = 2
- Width = 29
- Height = 29
- Hint = 'Delete Selected Item(s)'
- AllowAllUp = True
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000019000000190000000100
- 0400000000009001000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333000000033333333333333333333333330000000300000000000
- 000000003333300000000BBBBBBBBBBBBBBBBBBB0333300000000B0000000000
- 0000000B0333300000000B0FCFFFFFFFFF0F0F0B0333300000000B0FCFFFFFFF
- FF00000B0333300000000B0CCCCCCCCCCC00000B0333300000000B0FFFFFFF00
- 0F07770B0333300000000B0FFFFFF0D99007770B0333300000000B0FFFFF0FDD
- D807770B0333300000000B0FFFFF0DFD8880770B0333300000000B0FFFFFF0D7
- 7899070B0333300000000B0CCCCCCC077BB9900B0333300000000B0FCFFFFFF0
- FFBB990B0333300000000B0FCFFFFFFF0FFBB9900333300000000B0CCCCCCCCC
- C0FFBB990333300000000B0FCFFFFFFFFF0FFBB99033300000000B0FCFFFFFFF
- FF00FFBB9903300000000B000000000000000FFBB990300000000BBBBBB0FFF0
- BBBBB0FFBB9900000000300000000F000000000FFBB99000000033333330FFF0
- 33333330FFBB90000000333333300000333333330FFBB0000000333333333333
- 3333333330FFB0000000}
- OnClick = cmdEraseClick
- OnMouseDown = ToolBarMouseDown
- OnMouseMove = ToolbarMouseMove
- end
- object cmdPrint: TSpeedButton
- Tag = 249
- Left = 51
- Top = 2
- Width = 29
- Height = 29
- Hint = 'Print Selected Item(s)'
- AllowAllUp = True
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000019000000190000000100
- 0400000000009001000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333300000000
- 00000000033330000000333088888888888888888033300000003330F7777777
- 7777777778033000000033308888888888888888880330000000330000000000
- 00000000000330000000308888888888888888888803300000000F7777777777
- 777777777780300000000F7777777777777777777788000000000F7777777777
- 777777777788000000000F7777777777777222227788000000000F7777777777
- 777222227788000000000F7777777777777777777788000000000F7777777777
- 777777777788000000000FFFFFFFFFFFFFFFFFFFFF8800000000307777777777
- 7777777777F80000000033077000000000000000087F00000000333000FFFFFF
- FFFFFFFF000030000000333330FFFFFFFFFFFFFF0333300000003333388F8000
- 0000008F8833300000003333330FFFFFFFFFFFFFF0333000000033333330FF00
- 00000000FF0330000000333333330FFFFFFFFFFFFFF0300000003333333388F0
- 000000000FF8800000003333333330FFFFFFFFFFFFFF00000000333333333800
- 00000000000080000000}
- OnClick = cmdPrintClick
- OnMouseDown = ToolBarMouseDown
- OnMouseMove = ToolbarMouseMove
- end
- object cmdGlue: TSpeedButton
- Tag = 250
- Left = 81
- Top = 2
- Width = 29
- Height = 29
- Hint = 'Begin Auto-Glue of all TEXT items copied to Clipboard.'
- AllowAllUp = True
- GroupIndex = 6
- Glyph.Data = {
- 8A050000424D8A05000000000000760000002800000064000000190000000100
- 0400000000001405000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 333333333333333333FFFFFFFFFFFFFFFFFF3333333333333333333333333333
- 3333333333333333333333330000333300000000000000000033333338888888
- 888888888887F330000000000000033333333333000000000000003333333333
- 00003330EFE6E6E6E6E6E6E6760333338F333333333333333338F30BBBBBBBBB
- BBBBB03333333330B6E6E6E6EBBBBB033333333300003330FEFE6E6E6E6E6E67
- 670333338F333FFFF3FFF3333338F30B000000000000000000000030B06E6E6E
- 000000000000000300003330EFE000080006E6E6760333338F338888F8887FF3
- 3338F30B0FCFFFFFFF07676767676700B0F6E6E6FFF076767676767000003330
- FEFE600800800E67670333338F333388F88F88F33338F30B0FCFFFFFF0767676
- 76767600B0FE6E6EFF0767676767676000003330EFE6E008008006E676033333
- 8F333388F88F88F33338F30B0CCCCC000767676767676700B0C6E6E000767676
- 7676767000003330FFFFF00800800FF7780333338F333388F88F88F33338F30B
- 0FCFFF00FFF6E6E6E6E6E600B0FC6E600E6E6E6E6E6E6E6000003330FFFFF008
- 00800FF7780333338F333388F88F88F33338F30B0FCFFF88FFFF6E6E6E6E6E00
- B0FCE6E6E6E6E6E6E6E6E6E000003330FFFFF00800800FF7780333338F333388
- F88388F33338F30B0CCCCC88FFFFF6E6E6E6E600B0CCCE6E6E6E6E6E6E6E6E60
- 00003330FFFFF00FFFF00FF7780333338F333388F33388F33338F30B0FCFFF88
- FFFFFF6E6E6E6E00B0FCFFE6E6E6E6E6E6E6E6E000003330FFFFF00FFFF00FF7
- 780333338F3333887FFF88333338F30B0FCFFF88FFFFFFF6E6E6E600B0FCFFFE
- 6E6E6E6E6E6E6E600000333077FFFFF0000FFF777803333387F3333388883333
- 3338330B0CCCCC88FFFFFFFF6E6E6E00B0CCCCC88FFFFFFFFFE6E6E000003333
- 077FFFF8008FF77780333333387F3333388F33333383330B0FCFFF88FFFFFFFF
- E6E6E600B0FCFFF88FFFFFFFFFFF6E6000003333307FFFF8008FF77803333333
- 3387F333388F33333833330B0FCFFF88FFFFFFFF6E6E6E00B0FCFFF88FFFFFFF
- FFFFFFE000003333330FFFF8008777803333333333F8FFFFF88FFFFF8FFF330B
- 000000887FFFFFFFF6E6E600B000000887FFFFFFFFFFFFF00000333300000000
- 00000000003333333888888888888888888F330BBBBBBB8877FFFFFFFF6E6E00
- BBBBBBB8877FFFFFFFFFFFF0000033330FFFFFF7008778888033333338F33333
- 388F3333338F333000000088777FFFFFFFF6E603000000088777FFFFFFFFFFF0
- 000033330FFFFFF70087788880333333387FFFFFF88FFFFFFF83333333333300
- 8777777777676703333333300877777777777770000033333000000000000000
- 0333333333888888888888888833333333333300087777777776760333333330
- 00877777777777700000333333333333003333333333333333333333388FF333
- 3333333333333333308777777777670333333333330877777777777000003333
- 333333300003333333333333333333338888F333333333333333333333088888
- 8888880333333333333088888888888000003333333333300003333333333333
- 3333333388883333333333333333333333300000000000333333333333330000
- 0000000300003333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333330000333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333330000}
- NumGlyphs = 4
- OnClick = cmdGlueClick
- OnMouseDown = ToolBarMouseDown
- OnMouseMove = ToolbarMouseMove
- end
- object cmdMagnify: TSpeedButton
- Tag = 251
- Left = 111
- Top = 2
- Width = 29
- Height = 29
- Hint = 'Open Magnify window to view the item.'
- AllowAllUp = True
- GroupIndex = 2
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000019000000190000000100
- 0400000000009001000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333000000033333333333333333333333300000000300000000000
- 000000333330800000000BBBBBBBBBBBBBBBBB033308800000000B0000000008
- 000008033088700000000B0FCFFFF008888888000887000000000B0FCFFF0888
- 000008880870300000000B0FCFF08800FFFF00088003300000000B0CCC0880FF
- FFFFFF008803300000000B0FCF080FFFFFFFFFFF0803300000000B0FC8880FFF
- FFFFFFFF0770300000000B0FC080FFFFFFFFFFFFF070300000000B0CC080FFFF
- FFFFFFFFF070300000000B0FC080FF00FFFFFFFFF070300000000B0FC080F0FF
- 0FFFFFFFF070300000000B0FC080FF0FF0FFFFFFF070300000000B0CC8880FF0
- FF0FFFFF0770300000000B0FCF080FFF0F0FFFFF0703300000000B0FCF0770FF
- F0FFFF007703300000000B0FCFF07700FFFF00077033300000000B0000000777
- 000007770333300000000BBBBBB0FF0777777700333330000000300000000F08
- 0000083333333000000033333330FFF033333333333330000000333333300000
- 33333333333330000000}
- OnClick = cmdMagnifyClick
- OnMouseDown = ToolBarMouseDown
- OnMouseMove = ToolbarMouseMove
- end
- object cmdPPUp: TSpeedButton
- Tag = -1
- Left = 2
- Top = 2
- Width = 18
- Height = 15
- Hint = 'PowerPaste (Up)'
- AllowAllUp = True
- GroupIndex = 4
- Glyph.Data = {
- E2010000424DE2010000000000007600000028000000380000000D0000000100
- 0400000000006C01000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000003
- 33333888888883333330000000033333300000000333330FFFFFFFF033338777
- 77777833330FFF99FFF033330FFF99FFF03330FFFF00FFFF0338777788777783
- 30FFF9999FFF0330FFF9999FFF0330FFFF00FFFF033877778877778330FFF999
- 9FFF0330FFF9999FFF030FFFFFFFFFFFF0877777777777780FFFFF99FFFFF00F
- FFFF99FFFFF00FFFFFFFFFFFF0877777777777780FFFFFFFFFFFF00FFFFFFFFF
- FFF00FFF0FFFF0FFF0877787777877780FFF99FF99FFF00FFF99FF99FFF00FFF
- 0FFFF0FFF0877787777877780FFF99FF99FFF00FFF99FF99FFF030FF0FFFF0FF
- 033877877778778330FF99FF99FF0330FF99FF99FF0330FF0FFFF0FF03387787
- 7778778330FF99FF99FF0330FF99FF99FF03330FFFFFFFF03333877777777833
- 330FFFFFFFF033330FFFFFFFF033333000000003333338888888833333300000
- 0003333330000000033333333333333333333333333333333333333333333333
- 333333333333}
- NumGlyphs = 4
- OnClick = PPClick
- OnMouseDown = cmdPPMouseDownForHelpContext
- OnMouseMove = PPMouseMove
- end
- object cmdPPDown: TSpeedButton
- Tag = 1
- Left = 2
- Top = 16
- Width = 18
- Height = 15
- Hint = 'PowerPaste (Down)'
- AllowAllUp = True
- GroupIndex = 4
- Glyph.Data = {
- E2010000424DE2010000000000007600000028000000380000000D0000000100
- 0400000000006C01000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000003
- 33333888888883333330000000033333300000000333330FFFFFFFF033338777
- 77777833330FFF99FFF033330FFF99FFF03330FFFF00FFFF0338777788777783
- 30FFF9999FFF0330FFF9999FFF0330FFFF00FFFF033877778877778330FFF999
- 9FFF0330FFF9999FFF030FFFFFFFFFFFF0877777777777780FFFFF99FFFFF00F
- FFFF99FFFFF00FFFFFFFFFFFF0877777777777780FFFFFFFFFFFF00FFFFFFFFF
- FFF00FFF0FFFF0FFF0877787777877780FFF99FF99FFF00FFF99FF99FFF00FFF
- 0FFFF0FFF0877787777877780FFF99FF99FFF00FFF99FF99FFF030FF0FFFF0FF
- 033877877778778330FF99FF99FF0330FF99FF99FF0330FF0FFFF0FF03387787
- 7778778330FF99FF99FF0330FF99FF99FF03330FFFFFFFF03333877777777833
- 330FFFFFFFF033330FFFFFFFF033333000000003333338888888833333300000
- 0003333330000000033333333333333333333333333333333333333333333333
- 333333333333}
- NumGlyphs = 4
- OnClick = PPClick
- OnMouseDown = cmdPPMouseDownForHelpContext
- OnMouseMove = PPMouseMove
- end
- object cmdPick: TSpeedButton
- Tag = 252
- Left = 141
- Top = 2
- Width = 29
- Height = 29
- Hint = 'Open Pick Window'
- AllowAllUp = True
- GroupIndex = 5
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000019000000190000000100
- 0400000000009001000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333BBBBBB333
- 0777077077077000000033BBBBBBBB3307707707707700000000399BBBBBBBB3
- 007777770770300000009999BBBBBBBB03077070FF033000000099999BBBBBBB
- 0330FF03003330000000999999BBBBBB0333003333333000000099999ECCCCCC
- 033333333333300000009999EECCCCCC03333333300330000000999EEECC000C
- 033333330FF03000000039EEEECC0880033333330FF03000000033EEEECCC0F8
- 03333333300330000000333EEECCC3078033333333333000000000000000000F
- 7000000000000000000033333333333078038033333330000000300000003300
- F700080333311000000033333333330F0F70078033113000000030000003300F
- 0FF700803311300000003333333330F0F0FF707803311000000030000003300F
- 0F0F77770333100000003333333330F0F07FF77703113000000030000000030F
- 07FFFF77033110000000333333333330FF7FFFF7033330000000300000000333
- 0FFFFFF703333000000033333333333300F7FFFF703330000000333333333333
- 03000000003330000000}
- Layout = blGlyphBottom
- OnClick = cmdPickClick
- OnMouseDown = ToolBarMouseDown
- OnMouseMove = ToolbarMouseMove
- end
- object cmdFile: TSpeedButton
- Tag = 253
- Left = 171
- Top = 2
- Width = 29
- Height = 29
- Hint = 'Move Item(s) Into Another Collection.'
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000019000000190000000100
- 0400000000009001000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777707
- 77700000000000000000777770000090770BFBFBFBFB00000000777709999999
- 070FBFBFBFBF00000000777099999999900BFBFBFBFB00000000770999999999
- 070FBFBFBFBF00000000709999900090770BFBFBFBFB00000000709999077707
- 770FBFBFBFBF0000000070999077777777000000000000000000700000000000
- 7700FBFB0BFB000000000BBBBBBBBBBB070F0000BFBF000000000B000000000B
- 070BFBFBFBFB000000000B0FCFFFFF0B070FBFBFBFBF000000000B0FCFFFFF0B
- 070BFBFBFBFB000000000B0CCCCCCC0B070FBFBFBFBF000000000B0FCFFFFF0B
- 070000000000000000000B0FCFFFFF0B0700FBFB0BFB000000000B0CCCCCCC0B
- 070F0000BFBF000000000B0FCFFFFF0B070BFBFBFBFB000000000B0FCFFFFF0B
- 070FBFBFBFBF000000000B000000000B070BFBFBFBFB000000000BBB0FFF0BBB
- 070FBFBFBFBF00000000700000F000007700000000007000000077770FFF0777
- 7770FBFB07777000000077770000077777770000777770000000777777777777
- 77777777777770000000}
- Layout = blGlyphRight
- OnClick = cmdFileClick
- OnMouseDown = ToolBarMouseDown
- OnMouseMove = ToolbarMouseMove
- end
- object cmdSetCurrColl: TSpeedButton
- Tag = 254
- Left = 201
- Top = 2
- Width = 41
- Height = 29
- Glyph.Data = {
- E8000000424DE8000000000000007600000028000000090000000B0000000100
- 0400000000005800000000000000000000000000000000000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777300
- 0000700000007300000077777777780000007777077773000000777000777000
- 0000770000077000000070000000730000007770007778000000777000777000
- 0000777000777700000077777777700000000000000000000000000000000000
- 000000000000000000000000}
- Layout = blGlyphRight
- Margin = 1
- OnClick = cmdSetCurrCollClick
- OnMouseDown = ToolBarMouseDown
- OnMouseMove = ToolbarMouseMove
- end
- object imgCurrCollGlyph: TImage
- Tag = 254
- Left = 203
- Top = 4
- Width = 25
- Height = 25
- Hint =
- 'This is the current Collection. Click to load a different Colle' +
- 'ction.'
- Center = True
- PopupMenu = PopMenuProperties
- OnClick = cmdSetCurrCollClick
- end
- object spinScroll: TEPSpin
- Tag = 255
- Left = 243
- Top = 2
- Width = 19
- Height = 29
- Hint = 'Scroll To Next/Previous Item In Collection'
- BorderSpace = 0
- BorderStyle = epbsNone
- ButtonStyle = epbsSingle95
- OnSpin = spinScrollSpin
- end
- object cmdFlowText: TSpeedButton
- Tag = 297
- Left = -50
- Top = 2
- Width = 29
- Height = 29
- Hint = 'Re-Format to remove unwanted line breaks.'
- Enabled = False
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000019000000190000000100
- 0400000000009001000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333339999
- 999993333333300000003333339999999999999333333000000033339999FFFF
- FFFFF999933330000000333999FFFFFFFFFFFFF999333000000033999FFFFF00
- FF00FF999993300000003399FFFFFF00FF00F999999330000000399FFFFFFF00
- FF009999FF9930000000399FFFFFFF00FF09999FFF993000000099FFFFFFFF00
- FF9999FFFFF99000000099FFFFFFFF00F9999FFFFFF99000000099FFFFFFFF00
- 9999FFFFFFF99000000099FFFFFFFF099990FFFFFFF99000000099FFFFFFFF99
- 9900FFFFFFF99000000099FFFFFF09999F00FFFFFFF99000000099FFFFFF9999
- FF00FFFFFFF99000000099FFFFF99990FF00FFFFFFF990000000399FFF999900
- FF00FFFFFF9930000000399FF9999000FF00FFFFFF9930000000339999990000
- FF00FFFFF993300000003399999F000000000FFF999330000000333999FFF000
- 00000FF99933300000003333999FFFFFFFFFFF99933330000000333339999FFF
- FFFF999933333000000033333339999999999933333330000000333333333999
- 99993333333330000000}
- Margin = 0
- Visible = False
- OnClick = mnuFlowTextClick
- OnMouseDown = ToolBarMouseDown
- OnMouseMove = ToolbarMouseMove
- end
- object cbSelectItem: TComboBox
- Left = 2
- Top = 32
- Width = 263
- Height = 25
- Hint = 'Pick an item here and it is immediately placed on the Clipboard.'
- HelpContext = 145
- Style = csOwnerDrawFixed
- Color = clBtnFace
- Ctl3D = False
- DropDownCount = 15
- ItemHeight = 19
- ParentCtl3D = False
- PopupMenu = PopMenuWhatsThis
- TabOrder = 0
- OnClick = cbSelectItemClick
- OnDrawItem = cbSelectItemDrawItem
- end
- end
- object ClipView: TClipView
- Left = 4
- Top = 116
- Width = 45
- Height = 29
- Active = True
- Capturing = True
- SerialNum = 192
- OnCBChange = ClipViewCBChange
- OnRenderFormat = ClipViewRenderFormat
- OnCBChainChange = ClipViewCBChainChange
- FormatNums.Strings = (
- '1'
- '53347'
- '16'
- '7')
- FormatNames.Strings = (
- 'TEXT'
- 'Borland IDE Block Type'
- 'LOCALE'
- 'OEMTEXT')
- Creator = 'DELPHI32'
- Version = '1.81'
- Delay = 10
- NextInLineName = 'Delphi 2.0 - CLIPMT42'
- FirstInLineName = 'ClipMate'
- CyclicErrors = 0
- end
- object pnlSelectItem: TPanel
- Left = 3
- Top = 34
- Width = 242
- Height = 21
- BevelInner = bvLowered
- Caption = 'Multiple-Items Selected'
- Font.Color = clNavy
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- Visible = False
- end
- object MainMenu1: TMainMenu
- Left = 117
- Top = 75
- object mnuFile: TMenuItem
- Caption = '&File'
- HelpContext = 163
- ShortCut = 0
- object mnuFileSave: TMenuItem
- Caption = '&Save'
- HelpContext = 284
- ShortCut = 0
- OnClick = mnuFileSaveClick
- end
- object N10: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object Import3xData1: TMenuItem
- Caption = 'Import 3.x Data'
- HelpContext = 285
- ShortCut = 0
- OnClick = Import3xData1Click
- end
- object ImportCommaDelimitedText1: TMenuItem
- Caption = 'Import Comma-Delimited Text'
- Enabled = False
- ShortCut = 0
- Visible = False
- end
- object N18: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuPrint1: TMenuItem
- Caption = '&Print...'
- HelpContext = 286
- ShortCut = 0
- OnClick = cmdPrintClick
- end
- object mnuPrintOptions: TMenuItem
- Caption = 'Print &Options...'
- HelpContext = 287
- Hint = 'Other print options not included in Print Setup.'
- ShortCut = 0
- OnClick = mnuPrintOptionsClick
- end
- object mnuPrintSetup1: TMenuItem
- Caption = 'P&rint Setup...'
- HelpContext = 286
- ShortCut = 0
- OnClick = mnuPrintSetup1Click
- end
- object N1: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuExitWithoutSaving: TMenuItem
- Caption = 'Exit &Without Saving'
- HelpContext = 289
- Hint =
- 'Exit ClipMate, but don'#39't save the data to disk, regardless of "s' +
- 'ave on shutdown" setting.'
- ShortCut = 0
- OnClick = mnuExitWithoutSavingClick
- end
- object mnuExit1: TMenuItem
- Caption = 'E&xit'
- HelpContext = 290
- ShortCut = 0
- OnClick = mnuExit1Click
- end
- end
- object mnuEdit: TMenuItem
- Caption = '&Edit'
- HelpContext = 164
- ShortCut = 0
- object mnuDeleteSelectedItems: TMenuItem
- Caption = '&Delete Selected Items'
- HelpContext = 291
- ShortCut = 0
- OnClick = cmdEraseClick
- end
- object mnuDeleteAllItems: TMenuItem
- Caption = 'Delete &All Items'
- HelpContext = 292
- ShortCut = 0
- OnClick = cmdEraseClick
- end
- object N3: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuGlueTogether1: TMenuItem
- Caption = '&Glue Together'
- HelpContext = 293
- ShortCut = 16455
- OnClick = cmdGlueClick
- end
- object N12: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuTitle: TMenuItem
- Caption = 'Change Item &Title'
- HelpContext = 294
- ShortCut = 16468
- OnClick = mnuTitleClick
- end
- object mnuFlowText: TMenuItem
- Caption = 'Remove &Linebreaks'
- HelpContext = 295
- Hint = 'Re-Format to remove unwanted line breaks.'
- ShortCut = 16460
- OnClick = mnuFlowTextClick
- end
- object mnuShiftLeft: TMenuItem
- Caption = '<< Shift &Left'
- HelpContext = 296
- ShortCut = 0
- OnClick = mnuShiftLeftClick
- end
- object mnuShiftRight: TMenuItem
- Caption = '>> Shift &Right'
- HelpContext = 297
- ShortCut = 0
- OnClick = mnuShiftRightClick
- end
- object N15: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuLowerCase: TMenuItem
- Tag = 1
- Caption = '&Lower Case'
- HelpContext = 298
- ShortCut = 0
- OnClick = ChangeCase
- end
- object mnuUpperCase: TMenuItem
- Tag = 2
- Caption = '&Upper Case'
- HelpContext = 298
- ShortCut = 0
- OnClick = ChangeCase
- end
- object mnuMixedCase: TMenuItem
- Tag = 3
- Caption = '&Mixed Case'
- HelpContext = 298
- ShortCut = 0
- OnClick = ChangeCase
- end
- object mnuSentenceCase: TMenuItem
- Tag = 4
- Caption = '&Sentence Case'
- HelpContext = 298
- ShortCut = 0
- OnClick = ChangeCase
- end
- end
- object mnuConfig: TMenuItem
- Caption = '&Config'
- HelpContext = 165
- ShortCut = 0
- object mnuSettings: TMenuItem
- Caption = '&User Preferences ...'
- HelpContext = 299
- Hint = 'When you switch away from ClipMate (give focus to another '
- ShortCut = 0
- OnClick = mnuSettingsClick
- end
- object ApplicationProfile1: TMenuItem
- Caption = '&Application Profile ...'
- ShortCut = 0
- OnClick = ApplicationProfile1Click
- end
- object mnuListManagement1: TMenuItem
- Caption = '&Manage Collections ...'
- HelpContext = 300
- ShortCut = 0
- OnClick = mnuListManagement1Click
- end
- object N2: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuClipDiagnostics: TMenuItem
- Caption = 'Clipboard &Diagnostics ...'
- HelpContext = 301
- ShortCut = 0
- OnClick = mnuClipDiagnosticsClick
- end
- object ReestablishClipboardConnection1: TMenuItem
- Caption = 'Reestablish Clipboard Connection'
- ShortCut = 0
- OnClick = ReestablishClipboardConnection1Click
- end
- object N4: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuAutoCapture: TMenuItem
- Caption = '&Auto Capture'
- Checked = True
- HelpContext = 302
- ShortCut = 0
- OnClick = mnuAutoCaptureClick
- end
- end
- object mnuSelect: TMenuItem
- Caption = '&Select'
- HelpContext = 166
- ShortCut = 0
- object SelectNextItemUp1: TMenuItem
- Caption = 'Select &Previous Item (Up)'
- HelpContext = 303
- ShortCut = 16464
- OnClick = SelectNextItemUp1Click
- end
- object SelectNextItemDown1: TMenuItem
- Caption = 'Select &Next Item (Down)'
- HelpContext = 303
- ShortCut = 16462
- OnClick = SelectNextItemDown1Click
- end
- object N5: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuMagnify1: TMenuItem
- Caption = '&Open Magnify Window'
- HelpContext = 304
- ShortCut = 16461
- OnClick = cmdMagnifyClick
- end
- object mnuPicker: TMenuItem
- Caption = 'Open Pic&ker Window'
- HelpContext = 305
- ShortCut = 16459
- OnClick = cmdPickClick
- end
- object N8: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuFind: TMenuItem
- Caption = '&Find (Search)...'
- HelpContext = 306
- ShortCut = 16454
- OnClick = mnuFindClick
- end
- object mnuFindNext: TMenuItem
- Caption = 'Find Ne&xt'
- HelpContext = 306
- ShortCut = 114
- OnClick = mnuFindNextClick
- end
- object N6: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object cmdCharMap: TMenuItem
- Caption = '&CharMap (Launch)'
- HelpContext = 307
- Hint = 'Launch the CharMap application that comes with Windows'
- ShortCut = 0
- OnClick = cmdCharMapClick
- end
- end
- object mnuHelp: TMenuItem
- Caption = '&Help'
- HelpContext = 167
- ShortCut = 0
- object mnuHelpContents: TMenuItem
- Caption = '&Contents'
- HelpContext = 1
- ShortCut = 0
- OnClick = mnuHelpContentsClick
- end
- object mnuWhatsNew42: TMenuItem
- Caption = 'What'#39's New in 4.2'
- ShortCut = 0
- OnClick = mnuWhatsNew42Click
- end
- object mnuWhatsNew40: TMenuItem
- Caption = 'What'#39's &New in 4.0'
- HelpContext = 308
- ShortCut = 0
- OnClick = mnuWhatsNew40Click
- end
- object N11: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuOrderingRegistration: TMenuItem
- Caption = '&Ordering/Registration'
- HelpContext = 309
- ShortCut = 0
- OnClick = mnuOrderingRegistrationClick
- end
- object N7: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuTipOfTheDay: TMenuItem
- Caption = '&Tip Of The Day...'
- HelpContext = 310
- ShortCut = 0
- OnClick = mnuTipOfTheDayClick
- end
- object N9: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuAbout: TMenuItem
- Caption = '&About...'
- HelpContext = 311
- ShortCut = 0
- OnClick = mnuAboutClick
- end
- end
- end
- object PopMenuProperties: TPopupMenu
- Left = 148
- Top = 76
- object mnuCollProperties: TMenuItem
- Caption = 'Collection Properties...'
- ShortCut = 0
- OnClick = mnuCollPropertiesClick
- end
- object mnuCollMgt: TMenuItem
- Caption = 'Manage All Collections ...'
- ShortCut = 0
- OnClick = mnuListManagement1Click
- end
- object mnuNewCollection: TMenuItem
- Caption = 'New Collection...'
- Enabled = False
- ShortCut = 0
- Visible = False
- end
- object mnuOverrideAcceptNewClips: TMenuItem
- Caption = 'Temporarily Accept New Clips'
- Enabled = False
- Hint =
- 'For this session only, allow new clips, even though the Collecti' +
- 'on is set to not allow new clips.'
- ShortCut = 0
- OnClick = mnuOverrideAcceptNewClipsClick
- end
- object N13: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuWhatsThis2: TMenuItem
- Caption = 'What'#39's This?'
- ShortCut = 0
- OnClick = mnuWhatsThis2Click
- end
- end
- object PrinterSetupDialog1: TPrinterSetupDialog
- Left = 80
- Top = 76
- end
- object PrintDialog1: TPrintDialog
- Left = 80
- Top = 104
- end
- object tmrPP: TTimer
- Enabled = False
- Interval = 100
- OnTimer = AdvanceNextItem
- Left = 116
- Top = 212
- end
- object tmrAutoSave: TTimer
- Enabled = False
- Interval = 60000
- OnTimer = tmrAutoSaveTimer
- Left = 160
- Top = 212
- end
- object EPTipDialog1: TEPTipDialog
- Caption = 'ClipMate Tip Of The Day'
- HelpContext = 0
- MoreTipsContext = 0
- Tips.Strings = (
-
- 'If your data contains Rich Text, and you'#39're running the 32-bit v' +
- 'ersion of ClipMate, you can view the formatted text, complete wi' +
- 'th fonts, in the Rich Text tab of the Magnification Window.'
- 'The Picker Window has a grid where you can pick items visually.'
-
- 'The Picker Window allows you to select groups of items for gluin' +
- 'g together, printing, deleting, or moving.'
-
- 'You can create and maintain as many Collections of data as you'#39'd' +
- ' like.'
-
- 'Collections are very flexible - you can specify how long data is' +
- ' kept before being purged - either number of days or number of i' +
- 'tems (or never purge automatically.)'
-
- 'Not only can you assign icons to represent your Collections on t' +
- 'he toolbar, but you can even design your own! Use any bitmap ed' +
- 'itor to create a bitmap up to 25x25, place in \clipmt40\buttons ' +
- 'directory, and assign to collection.'
-
- 'Right-Click has many uses in ClipMate - try right-clicking on th' +
- 'e Collection button (the one with the drop-down arrow next to it' +
- '.)'
-
- 'The spin button at the right of the toolbar is new - it allows y' +
- 'ou to scroll through items without using the drop-down list.'
-
- 'Hotkeys Ctrl+F1 - Ctrl+F12 will summon the top 12 items in the c' +
- 'urrent collection.'
-
- 'If you'#39're running Windows95 or NT, then the ALT+SHIFT+C hotkey w' +
- 'ill bring ClipMate to the foreground.'
-
- 'ClipMate makes a terriffic PrintScreen utility. Just press the ' +
- 'PrintScreen key to send the whole screen bitmap to ClipMate, the' +
- 'n Print to any printer. It even prints in Color, if your printe' +
- 'r supports it.'
-
- 'The Alt+Printscreen key combination creates a bitmap of the curr' +
- 'ent application, and sends it to ClipMate. PrintScreen alone se' +
- 'nds the whole screen!'
-
- 'Use the "New Items Enter At Bottom" option for Collections of da' +
- 'ta that you wish to keep for a long time - it makes commonly-ref' +
- 'erenced items easier to find, and makes the Hotkey option more p' +
- 'owerful.'
-
- 'The Picker window lets you re-arrange the order of a Collection ' +
- '- try it!'
-
- 'ClipMate'#39's advanced memory management ensures that only a minima' +
- 'l amount of RAM and system resources are used by your data. Ite' +
- 'ms not being used are kept on disk until needed.'
-
- 'You can change the title of an item - see EDIT | Change Item Tit' +
- 'le, or just type a new on in the Magnify Window.'
-
- 'If you'#39're running Windows95, the SysTray option puts ClipMate'#39's ' +
- 'icon into the little system tray at the bottom of the screen.'
- 'You can order online via the WWW. Securely!'
- 'We post updates on our web page at: http://www.thornsoft.com'
- 'We have a Frequently Asked Questions page at our web site.')
- TipTitle = 'Did You Know?'
- Left = 92
- Top = 152
- end
- object AdrockFormPosition1: TAdrockFormPosition
- Version = '1.40b'
- SectionName = 'SaveFrmMain'
- IniFile = 'clipmt40.ini'
- WriteWhenLoaded = False
- SaveDefaultDetails = False
- Enabled = False
- RestoreStyle = rsPositionOnly
- Left = 192
- Top = 152
- end
- object PopMenuWhatsThis: TPopupMenu
- Left = 184
- Top = 76
- object mnuWhatsThis: TMenuItem
- Caption = 'What'#39's This?'
- ShortCut = 0
- OnClick = mnuWhatsThisClick
- end
- end
- object PopupMenuPasteWhat: TPopupMenu
- Left = 184
- Top = 112
- object m1: TMenuItem
- Caption = '1'
- ShortCut = 0
- object s1: TMenuItem
- Caption = '1'
- ShortCut = 0
- OnClick = mnuPasteWhatClick
- end
- object s2: TMenuItem
- Caption = '2'
- ShortCut = 0
- OnClick = mnuPasteWhatClick
- end
- object s3: TMenuItem
- Caption = '3'
- ShortCut = 0
- end
- end
- object m2: TMenuItem
- Caption = '2'
- ShortCut = 0
- end
- end
- object tmrAfterLoad: TTimer
- Enabled = False
- Interval = 150
- OnTimer = tmrAfterLoadTimer
- Left = 72
- Top = 212
- end
- object PopupMenuSysTray: TPopupMenu
- Left = 224
- Top = 80
- object mnuSTAutoCapture: TMenuItem
- Caption = 'Aut&o Capture'
- ShortCut = 0
- OnClick = mnuAutoCaptureClick
- end
- object mnuSTOnTop: TMenuItem
- Caption = '&Always On Top'
- ShortCut = 0
- OnClick = mnuSTOnTopClick
- end
- object mnuSTUserPref: TMenuItem
- Caption = 'User &Preferences'
- ShortCut = 0
- OnClick = mnuSettingsClick
- end
- object mnuSTHelp: TMenuItem
- Caption = '&Help'
- ShortCut = 0
- OnClick = mnuHelpContentsClick
- end
- object mnuSTExit: TMenuItem
- Caption = 'E&xit ClipMate (Shut Down)'
- ShortCut = 0
- OnClick = mnuSTExitClick
- end
- object N17: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuSTMagnify: TMenuItem
- Caption = 'Show &Magnify Window'
- ShortCut = 0
- OnClick = cmdMagnifyClick
- end
- object N16: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object mnuSTPPUp: TMenuItem
- Tag = -1
- Caption = 'PowerPaste &Up'
- ShortCut = 0
- OnClick = PPClick
- end
- object mnuSTPPDown: TMenuItem
- Tag = 1
- Caption = 'PowerPaste &Down'
- ShortCut = 0
- OnClick = PPClick
- end
- object mnuSTPrev: TMenuItem
- Caption = 'Select &Previous Item (Up)'
- ShortCut = 0
- OnClick = SelectNextItemUp1Click
- end
- object mnuSTNext: TMenuItem
- Caption = 'Select &Next Item (Down)'
- ShortCut = 0
- OnClick = SelectNextItemDown1Click
- end
- end
- object OpenDialog1: TOpenDialog
- FileEditStyle = fsEdit
- FileName = '*.clm'
- Filter = 'ClipMate 2.0/3.0|*.clm'
- InitialDir = 'c:\clipmate\data'
- Options = [ofPathMustExist, ofFileMustExist]
- Left = 20
- Top = 156
- end
- object SysTray: TPGTrayIcon95
- Icon.Data = {<image007.ico>}
- DisabledIcon.Data = {
- 0000010001001010100000000000280100001600000028000000100000002000
- 00000100040000000000C0000000000000000000000000000000000000000000
- 0000000080000080000000808000800000008000800080800000C0C0C0008080
- 80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
- 0000000000000BBBB999999BBBB00B009999999900B00B099FFFF07990B00B99
- 99CCC00099B0099F999FF0777990099CC999C0777990099FCF9990777990099C
- CCC999777990099FCFFF99900990099FC000099979900B9900FFF09999B00BB9
- 90FFF0B99BB00000999999990000000009999990000000000000000000008001
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000080010000F81F0000F83F0000}
- Active = True
- AutoPopup = True
- Hint = 'ClipMate 4.2'
- OnClick = SysTrayClick
- OnDblClick = SysTrayClick
- PopupMenu = PopupMenuSysTray
- Left = 46
- Top = 75
- end
- object tmrPersistentClipboardWatching: TTimer
- Enabled = False
- Interval = 10000
- OnTimer = tmrPersistentClipboardWatchingTimer
- Left = 206
- Top = 211
- end
- end
-