home *** CD-ROM | disk | FTP | other *** search
- object animboxform: Tanimboxform
- Left = 220
- Top = 156
- Width = 583
- Height = 503
- Caption = 'Animation Frame Handler'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 144
- Top = 440
- Width = 57
- Height = 13
- Hint = 'Drag and Drop Files From Paintbook or Filmstrip'
- Caption = 'Drop Target'
- 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 Label2: TLabel
- Left = 162
- Top = 58
- Width = 63
- Height = 13
- Alignment = taRightJustify
- Caption = 'C:\APbook'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- end
- object Label3d3: TLabel3d
- Left = 528
- Top = 50
- Width = 37
- Height = 16
- Caption = '*.BMP'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- Transparent = True
- AStyle3D = Raised3d
- AShadeLTSet = False
- end
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 575
- Height = 38
- Align = alTop
- Caption = ' '
- TabOrder = 0
- object Label3d1: TLabel3d
- Left = 408
- Top = 10
- Width = 34
- Height = 16
- Caption = 'Width'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- Transparent = True
- AStyle3D = Resit3d
- AShadeLTSet = False
- end
- object Label3d2: TLabel3d
- Left = 528
- Top = 10
- Width = 39
- Height = 16
- Caption = 'Height'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- Transparent = True
- AStyle3D = Resit3d
- AShadeLTSet = False
- end
- object BitBtn1: TBitBtn
- Left = 8
- Top = 8
- Width = 75
- Height = 25
- TabOrder = 0
- OnClick = BitBtn1Click
- Kind = bkOK
- end
- object BitBtn2: TBitBtn
- Left = 88
- Top = 8
- Width = 75
- Height = 25
- TabOrder = 1
- OnClick = BitBtn2Click
- Kind = bkCancel
- end
- object BitBtn3: TBitBtn
- Left = 248
- Top = 8
- Width = 75
- Height = 25
- Hint = 'Save the animation frame'
- Caption = 'Save It'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = BitBtn3Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
- 00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
- 00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
- 00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
- 00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
- 00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
- 00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
- 0003737FFFFFFFFF7F7330099999999900333777777777777733}
- NumGlyphs = 2
- end
- object BitBtn4: TBitBtn
- Left = 168
- Top = 8
- Width = 75
- Height = 25
- Hint = 'Paste Bitmap off the Clipboard'
- Caption = 'Paste'
- TabOrder = 3
- OnClick = BitBtn4Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330FFFFF
- FFF03333337F3FFFF3F73333330F0000F0F03333337F777737373333330FFFFF
- FFF033FFFF7FFF33FFF77000000007F00000377777777FF777770BBBBBBBB0F0
- FF037777777777F7F3730B77777BB0F0F0337777777777F7F7330B7FFFFFB0F0
- 0333777F333377F77F330B7FFFFFB0009333777F333377777FF30B7FFFFFB039
- 9933777F333377F777FF0B7FFFFFB0999993777F33337777777F0B7FFFFFB999
- 9999777F3333777777770B7FFFFFB0399933777FFFFF77F777F3070077007039
- 99337777777777F777F30B770077B039993377FFFFFF77F777330BB7007BB999
- 93337777FF777777733370000000073333333777777773333333}
- NumGlyphs = 2
- end
- object SpinEdit1: TSpinEdit
- Left = 328
- Top = 8
- Width = 73
- Height = 22
- Hint = 'Width of Animation Frame'
- MaxValue = 4000
- MinValue = 5
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- Value = 320
- end
- object SpinEdit2: TSpinEdit
- Left = 448
- Top = 8
- Width = 73
- Height = 22
- Hint = 'Height of Animation Frame'
- MaxValue = 4000
- MinValue = 5
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- Value = 200
- end
- end
- object Panel2: TPanel
- Left = 408
- Top = 72
- Width = 161
- Height = 377
- Caption = ' '
- TabOrder = 1
- object DirectoryListBox1: TDirectoryListBox
- Left = 1
- Top = 1
- Width = 159
- Height = 98
- Align = alTop
- Ctl3D = True
- DirLabel = Label2
- FileList = FileListBox1
- ItemHeight = 16
- ParentCtl3D = False
- TabOrder = 0
- end
- object FileListBox1: TFileListBox
- Left = 1
- Top = 99
- Width = 159
- Height = 277
- Hint = 'Doubleclick to Load as Frame'
- Align = alClient
- ItemHeight = 13
- Mask = '*.BMP;*.ICO;*.EMF;*.MTF'
- TabOrder = 1
- OnDblClick = FileListBox1DblClick
- end
- end
- object DriveComboBox1: TDriveComboBox
- Left = 407
- Top = 51
- Width = 117
- Height = 19
- DirList = DirectoryListBox1
- TabOrder = 2
- end
- object Edit2: TEdit
- Left = 232
- Top = 56
- Width = 97
- Height = 21
- Hint = 'Your Frame Name'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- Text = 'MYFRAME'
- end
- object SpinEdit3: TSpinEdit
- Left = 336
- Top = 56
- Width = 65
- Height = 22
- Hint = 'Appended to name '
- MaxValue = 0
- MinValue = 0
- TabOrder = 4
- Value = 0
- end
- object CheckBox1: TCheckBox
- Left = 232
- Top = 40
- Width = 161
- Height = 17
- Caption = 'Warn Before Overwrite'
- State = cbChecked
- TabOrder = 5
- end
- object Panel3: TPanel
- Left = 8
- Top = 80
- Width = 393
- Height = 353
- Caption = ' '
- Color = clWindow
- TabOrder = 6
- object Image2: TImage
- Left = 0
- Top = 232
- Width = 129
- Height = 121
- AutoSize = True
- Visible = False
- end
- object Image1: TImage
- Left = 1
- Top = 1
- Width = 391
- Height = 351
- Align = alClient
- AutoSize = True
- Stretch = True
- OnDragDrop = Image1DragDrop
- OnDragOver = Image1DragOver
- end
- end
- object StatusBar1: TStatusBar
- Left = 0
- Top = 457
- Width = 575
- Height = 19
- Panels = <>
- SimplePanel = False
- end
- object BitBtn5: TBitBtn
- Left = 8
- Top = 432
- Width = 75
- Height = 25
- TabOrder = 8
- OnClick = BitBtn5Click
- Kind = bkHelp
- end
- end
-