home *** CD-ROM | disk | FTP | other *** search
- object AnimCap1: TAnimCap1
- Left = 218
- Top = 173
- Width = 755
- Height = 355
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- Caption = 'AnimCap1'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnDeactivate = FormDeactivate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object label1: TLabel
- Left = 8
- Top = 168
- Width = 40
- Height = 16
- Caption = 'Width'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 8
- Top = 200
- Width = 46
- Height = 16
- Caption = 'Height'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object label4: TLabel
- Left = 16
- Top = 232
- Width = 45
- Height = 13
- Caption = 'Filename '
- end
- object Label8: TLabel
- Left = 152
- Top = 250
- Width = 32
- Height = 16
- Caption = '.BMP'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object Label3: TLabel
- Left = 88
- Top = 232
- Width = 67
- Height = 13
- Caption = 'Frame number'
- end
- object Label5: TLabel
- Left = 488
- Top = 32
- Width = 184
- Height = 13
- Caption = 'Mark FIlenames That you Want Played'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clMaroon
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object labeldrag: TLabel
- Left = 376
- Top = 200
- Width = 114
- Height = 13
- Caption = '--> or Mark and drag --> '
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clMaroon
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object labsave: TLabel
- Left = 32
- Top = 144
- Width = 134
- Height = 13
- Caption = 'Drag images from film below '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clMaroon
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label6: TLabel
- Left = 376
- Top = 4
- Width = 46
- Height = 16
- Caption = 'Delay '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label7: TLabel
- Left = 40
- Top = 272
- Width = 76
- Height = 13
- Caption = 'Target Filename'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clMaroon
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object SpeedButton1: TSpeedButton
- Left = 152
- Top = 200
- Width = 25
- Height = 25
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
- 33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
- FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
- FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
- FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
- FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
- FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
- 3333333773FFFF77333333333FBFBF3333333333377777333333}
- NumGlyphs = 2
- OnClick = SpeedButton1Click
- end
- object Label9: TLabel
- Left = 599
- Top = 4
- Width = 10
- Height = 16
- Caption = 'X'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label10: TLabel
- Left = 424
- Top = 24
- Width = 9
- Height = 16
- Caption = '0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object SpinEdit3: TSpinEdit
- Left = 88
- Top = 248
- Width = 65
- Height = 22
- MaxValue = 0
- MinValue = 0
- TabOrder = 0
- Value = 0
- end
- object BitBtn1: TBitBtn
- Left = 96
- Top = 296
- Width = 81
- Height = 25
- Caption = 'Preview'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = BitBtn1Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
- 0000377777777777777703030303030303037F7F7F7F7F7F7F7F000000000000
- 00007777777777777777933393303933337073F37F37F73F3377393393303393
- 379037FF7F37F37FF777379793303379793037777337F3777737339933303339
- 93303377F3F7F3F77F3733993930393993303377F737F7377FF7399993303399
- 999037777337F377777793993330333393307377FF37F3337FF7333993303333
- 993033377F37F33377F7333993303333993033377337F3337737333333303333
- 33303FFFFFF7FFFFFFF700000000000000007777777777777777030303030303
- 03037F7F7F7F7F7F7F7F00000000000000007777777777777777}
- NumGlyphs = 2
- end
- object BitBtn2: TBitBtn
- Left = 8
- Top = 296
- Width = 81
- Height = 25
- TabOrder = 2
- OnClick = BitBtn2Click
- Kind = bkOK
- end
- object Panel1: TPanel
- Left = 208
- Top = 0
- Width = 161
- Height = 297
- Caption = 'Panel1'
- TabOrder = 3
- object FileListBox1: TFileListBox
- Left = 4
- Top = 112
- Width = 153
- Height = 177
- DragCursor = crMultiDrag
- DragMode = dmAutomatic
- ItemHeight = 16
- Mask = '*.bmp'
- MultiSelect = True
- TabOrder = 0
- OnChange = FileListBox1Change
- OnClick = FileListBox1Click
- OnDblClick = FileListBox1DblClick
- end
- object DirectoryListBox1: TDirectoryListBox
- Left = 4
- Top = 32
- Width = 153
- Height = 81
- Ctl3D = True
- DragMode = dmAutomatic
- FileList = FileListBox1
- ItemHeight = 16
- ParentCtl3D = False
- TabOrder = 1
- OnChange = DirectoryListBox1Change
- end
- object DriveComboBox1: TDriveComboBox
- Left = 20
- Top = 11
- Width = 117
- Height = 19
- DirList = DirectoryListBox1
- TabOrder = 2
- OnChange = DriveComboBox1Change
- end
- end
- object BitBtn9: TBitBtn
- Left = 496
- Top = 296
- Width = 75
- Height = 25
- Caption = '&Close'
- TabOrder = 4
- OnClick = BitBtn9Click
- Glyph.Data = {
- DE010000424DDE01000000000000760000002800000024000000120000000100
- 0400000000006801000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
- F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
- 000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
- 338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
- 45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
- 3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
- F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
- 000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
- 338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
- 4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
- 8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
- 333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
- 0000}
- NumGlyphs = 2
- end
- object BitBtn10: TBitBtn
- Left = 496
- Top = 224
- Width = 75
- Height = 25
- Caption = 'Preview'
- TabOrder = 5
- OnClick = BitBtn10Click
- end
- object Panel2: TPanel
- Left = 584
- Top = 224
- Width = 97
- Height = 89
- Caption = 'Panel2'
- TabOrder = 6
- Visible = False
- object Image3: TImage
- Left = 8
- Top = 8
- Width = 81
- Height = 73
- DragMode = dmAutomatic
- Stretch = True
- end
- end
- object Edit1: TEdit
- Left = 0
- Top = 248
- Width = 89
- Height = 21
- TabOrder = 7
- Text = 'MyAnimation'
- end
- object BitBtn11: TBitBtn
- Left = 496
- Top = 263
- Width = 75
- Height = 25
- Caption = 'Stop'
- TabOrder = 8
- OnClick = BitBtn11Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388333333333
- 33333333F33333333333911833333983333333388F333333F333911183339118
- 3333338F38F333F88F339111183911118333338F338F3F8338F3391111811111
- 8333338F3338F833338F33911111111833333338F33383333F83333911111183
- 333333338F333333F8333333111118333333333338F333338333333391111833
- 33333333338F333833333339111118333333333333833338F333339111811183
- 3333333338333338F3333911183911183333333383338F338F33391183339111
- 83333338F33838F338F333913333391113333338FF83338F338F333333333391
- 9333333388333338FFF833333333333333333333333333338883}
- NumGlyphs = 2
- end
- object TrackBar1: TTrackBar
- Left = 416
- Top = 0
- Width = 177
- Height = 25
- Max = 1000
- Orientation = trHorizontal
- PageSize = 100
- Frequency = 100
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 9
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- end
- object BitBtn3: TBitBtn
- Left = 376
- Top = 136
- Width = 105
- Height = 25
- Caption = 'UnMarked'
- TabOrder = 10
- OnClick = BitBtn3Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333333333333333333FFF333333333333000333333333
- 3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0
- 3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF
- 0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF
- BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033
- 33337777773FF733333333333300033333333333337773333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333}
- Layout = blGlyphRight
- NumGlyphs = 2
- end
- object BitBtn4: TBitBtn
- Left = 376
- Top = 104
- Width = 105
- Height = 25
- Caption = 'Remove'
- TabOrder = 11
- OnClick = BitBtn4Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 333333333333333333333333333F033333333333333387333333333333F03333
- 3333333333387333333333333F000333333333333387773333333333FFFFF033
- 3333333338888873333333333F033F0333333333338733873333333333F033F0
- 333333333338733873333333333F03F0333333333333873873333333333333F0
- 333333333333333873333333333333F0333333333333333873333333333333F0
- 33333333333333387333333333333F03333333333333338733333333FFFFF033
- 3333333338888873333333333000033333333333337777333333333333333333
- 3333333333333333333333333333333333333333333333333333}
- Layout = blGlyphRight
- NumGlyphs = 2
- end
- object BitBtn5: TBitBtn
- Left = 376
- Top = 168
- Width = 105
- Height = 25
- Caption = 'Marked'
- TabOrder = 12
- OnClick = BitBtn5Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00344444444444
- 4444444444444444444444444444444444444FFF444444444444000444444444
- 4444888FFF4FFFFF44440B000400000444448F888F888883F444000E00BFBFB0
- 4444888F883333F8F444000E0BFBF0004444888F8F3338883F44000E0FBFBFBF
- 0444888F8F3333FF8FFF000E0BFBF0000004888F8F3338888883000E0FBFBFBF
- BFB0888F8F33FFFFFFF8000E0BF000000004888F8FF888888884000000BFB044
- 44448888883FF844444444444400044444444444448884444444444444444444
- 4444444444444444444444444444444444444444444444444444444444444444
- 4444444444444444444444444444444444444444444444444444}
- Layout = blGlyphRight
- NumGlyphs = 2
- end
- object BitBtn6: TBitBtn
- Left = 376
- Top = 296
- Width = 113
- Height = 25
- Caption = 'Save File List'
- TabOrder = 13
- OnClick = BitBtn6Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
- 00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
- 00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
- 00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
- 00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
- 00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
- 00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
- 0003737FFFFFFFFF7F7330099999999900333777777777777733}
- NumGlyphs = 2
- end
- object BitBtn7: TBitBtn
- Left = 376
- Top = 263
- Width = 113
- Height = 25
- Caption = 'Load File List'
- TabOrder = 14
- OnClick = BitBtn7Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555555555555555555555555555555555555555555555555555555555555
- 555555555555555555555555555555555555555FFFFFFFFFF555550000000000
- 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
- B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
- 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
- 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
- 55555575FFF75555555555700007555555555557777555555555555555555555
- 5555555555555555555555555555555555555555555555555555}
- NumGlyphs = 2
- end
- object BitBtn12: TBitBtn
- Left = 240
- Top = 296
- Width = 105
- Height = 25
- TabOrder = 15
- OnClick = BitBtn12Click
- Kind = bkHelp
- end
- object Panel3: TPanel
- Left = 0
- Top = 0
- Width = 193
- Height = 145
- Caption = 'Drag n'#39' Save Drop Site'
- TabOrder = 16
- object Image1: TImage
- Left = 1
- Top = 1
- Width = 191
- Height = 143
- Align = alClient
- DragMode = dmAutomatic
- Stretch = True
- OnDragDrop = Image1DragDrop
- OnDragOver = Image1DragOver
- end
- end
- object SpinEdit4: TSpinEdit
- Left = 616
- Top = 0
- Width = 65
- Height = 22
- Increment = 10
- MaxValue = 10000
- MinValue = 0
- TabOrder = 17
- Value = 10
- end
- object copybut: TBitBtn
- Left = 376
- Top = 40
- Width = 105
- Height = 25
- Hint = 'Copy Marked File From Top for Pasteing into AVIEdit'
- Caption = 'Top Down'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 18
- OnClick = copybutClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
- FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
- FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
- 007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
- 7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
- 99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
- 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
- 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
- 93337FFFF7737777733300000033333333337777773333333333}
- NumGlyphs = 2
- end
- object ListBox1: TListBox
- Left = 488
- Top = 48
- Width = 253
- Height = 169
- Hint = 'These Filenames Will be played'
- DragCursor = crMultiDrag
- ItemHeight = 13
- MultiSelect = True
- ParentShowHint = False
- ShowHint = True
- TabOrder = 19
- OnDblClick = ListBox1DblClick
- OnDragDrop = ListBox1DragDrop
- OnDragOver = ListBox1DragOver
- OnEndDrag = ListBox1EndDrag
- OnMouseMove = ListBox1MouseMove
- end
- object BitBtn8: TBitBtn
- Left = 376
- Top = 72
- Width = 105
- Height = 25
- Hint = 'Copy Marked File From Bottom for Pasteing into AVIEdit'
- Caption = 'Bottom Up'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 20
- OnClick = BitBtn8Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
- FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
- FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
- 007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
- 7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
- 99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
- 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
- 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
- 93337FFFF7737777733300000033333333337777773333333333}
- NumGlyphs = 2
- end
- object BitBtn13: TBitBtn
- Left = 688
- Top = 224
- Width = 57
- Height = 25
- Caption = 'Select All'
- TabOrder = 21
- OnClick = BitBtn13Click
- end
- object BitBtn14: TBitBtn
- Left = 688
- Top = 256
- Width = 57
- Height = 25
- Caption = 'Resize'
- TabOrder = 22
- OnClick = BitBtn14Click
- end
- object Pb1: TProgressBar
- Left = 576
- Top = 312
- Width = 169
- Height = 17
- Min = 0
- Max = 100
- TabOrder = 23
- Visible = False
- end
- object ImageList1: TImageList
- Left = 176
- Top = 168
- end
- object SavePictureDialog1: TSavePictureDialog
- DefaultExt = 'BMP'
- Filter = 'Windows Bitmaps (*.BMP)|*.BMP'
- Left = 152
- Top = 168
- end
- object SaveDialog1: TSaveDialog
- DefaultExt = 'LST'
- FileName = ' '
- Filter = '*.LST'
- InitialDir = 'mainform.prjdir'
- Title = 'Save Filename List'
- Left = 376
- Top = 32
- end
- object OpenDialog1: TOpenDialog
- FileName = '*.lst'
- Filter = 'List File (*.LST)|*.LST|All Files (List of FileNames OK )|*.*'
- Title = 'Load a List of Filenames'
- Left = 456
- Top = 32
- end
- end
-