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