home *** CD-ROM | disk | FTP | other *** search
- object shapeform: Tshapeform
- Left = 223
- Top = 185
- Width = 524
- Height = 376
- Caption = 'Morf Into Shape'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Label3d1: TLabel3d
- Left = 368
- Top = 152
- Width = 120
- Height = 20
- Caption = 'Finished Width'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Transparent = True
- AStyle3D = Raised3d
- AShadeLTSet = False
- end
- object Label3d2: TLabel3d
- Left = 368
- Top = 184
- Width = 127
- Height = 20
- Caption = 'Finished Height'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Transparent = True
- AStyle3D = Raised3d
- AShadeLTSet = False
- end
- object Label1: TLabel
- Left = 328
- Top = 249
- Width = 123
- Height = 13
- Caption = 'Pure White is Transparent'
- end
- object Label3d3: TLabel3d
- Left = 376
- Top = 96
- Width = 17
- Height = 16
- Caption = 'Or'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Transparent = True
- AStyle3D = Raised3d
- AShadeLTSet = False
- end
- object Label2: TLabel
- Left = 40
- Top = 48
- Width = 370
- Height = 13
- Caption =
- 'Choose an image on a bitmap that is surrounded by pure white f' +
- 'or best results'
- end
- object Label3: TLabel
- Left = 360
- Top = 288
- Width = 69
- Height = 20
- Caption = 'This Clip'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clMaroon
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 40
- Top = 304
- Width = 181
- Height = 20
- Caption = 'Morfs into This Shape '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clMaroon
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Panel2: TPanel
- Left = 0
- Top = 0
- Width = 516
- Height = 41
- Align = alTop
- Caption = ' '
- TabOrder = 0
- object BitBtn1: TBitBtn
- Left = 16
- Top = 8
- Width = 75
- Height = 25
- TabOrder = 0
- OnClick = BitBtn1Click
- Kind = bkOK
- end
- object BitBtn2: TBitBtn
- Left = 120
- Top = 8
- Width = 75
- Height = 25
- TabOrder = 1
- OnClick = BitBtn2Click
- Kind = bkCancel
- end
- end
- object StatusBar1: TStatusBar
- Left = 0
- Top = 330
- Width = 516
- Height = 19
- Panels = <>
- SimplePanel = False
- end
- object BitBtn3: TBitBtn
- Left = 296
- Top = 72
- Width = 201
- Height = 25
- Caption = 'Load BMP to shape from file'
- TabOrder = 2
- OnClick = BitBtn3Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555555555555555555555555555555555555555555555555555555555555
- 555555555555555555555555555555555555555FFFFFFFFFF555550000000000
- 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
- B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
- 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
- 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
- 55555575FFF75555555555700007555555555557777555555555555555555555
- 5555555555555555555555555555555555555555555555555555}
- NumGlyphs = 2
- end
- object SpinEdit1: TSpinEdit
- Left = 296
- Top = 152
- Width = 65
- Height = 22
- MaxValue = 4000
- MinValue = 10
- TabOrder = 3
- Value = 100
- end
- object SpinEdit2: TSpinEdit
- Left = 296
- Top = 184
- Width = 65
- Height = 22
- MaxValue = 4000
- MinValue = 10
- TabOrder = 4
- Value = 100
- end
- object Panel1: TPanel
- Left = 0
- Top = 64
- Width = 289
- Height = 241
- Color = clWindow
- TabOrder = 5
- object Image1: TImage
- Left = 8
- Top = 8
- Width = 273
- Height = 225
- AutoSize = True
- Stretch = True
- end
- end
- object BitBtn6: TBitBtn
- Left = 304
- Top = 120
- Width = 193
- Height = 25
- Caption = 'Choose Standard Shape'
- TabOrder = 6
- OnClick = BitBtn6Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00444444444444
- 444444444444444444444555555555555554488888888888888445CCCCCCCCCC
- CC5448FFFFFFFFFFFF8445CDDDDDDDDDDC5448F8888888888F8445CDEEEEEEEE
- DC5448F8FFFFFFFF8F8445CDEEEEEEEEDC5448F8F888888F8F8445CDEEFFFFEE
- DC5448F8F8FFFF8F8F8445CDEEFFFFEEDC5448F8F8FFFF8F8F8445CDEEFFFFEE
- DC5448F8F8FFFF8F8F8445CDEEFFFFEEDC5448F8F8FFFF8F8F8445CDEEEEEEEE
- DC5448F8F888888F8F8445CDEEEEEEEEDC5448F8FFFFFFFF8F8445CDDDDDDDDD
- DC5448F8888888888F8445CCCCCCCCCCCC5448FFFFFFFFFFFF84455555555555
- 5554488888888888888444444444444444444444444444444444}
- NumGlyphs = 2
- end
- object BitBtn5: TBitBtn
- Left = 320
- Top = 216
- Width = 145
- Height = 25
- Hint = 'Go Ahead and Morf it'
- Caption = 'Go Ahead and Morf it'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 7
- OnClick = BitBtn5Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333CC4444333
- 333333333FFFFFF333333CCCEEEE43333333333FFF7777F333333CEEEEEE4333
- 3333333F777777F333333CCEE1EE43333333333FF77F77F3333333CC19143333
- 33333333FFF7FF333333333199913443333333333F777F3FF333331999991EE4
- 33333333F77777FFFF333199999991E43333333F7777777FFF3311111111111E
- 433333FFFFFFFFFFF7F333331991EEEE4333333333F77F7777F3333331991EEE
- 43333333333F77F777F334444E1991E43333333FFFF7F77F7F3334EEEEE11EE4
- 3333333F77777FF77F3334EEEEEEE4433333333F7777777FF333344444444333
- 3333333FFFFFFFF3333333333333333333333333333333333333}
- NumGlyphs = 2
- end
- object Panel3: TPanel
- Left = 432
- Top = 272
- Width = 73
- Height = 49
- Caption = 'Clip'
- Color = clWhite
- TabOrder = 8
- object Image2: TImage
- Left = 1
- Top = 1
- Width = 71
- Height = 47
- Align = alClient
- AutoSize = True
- Stretch = True
- end
- end
- object OpenPictureDialog1: TOpenPictureDialog
- Filter =
- 'All (*.bmp;*.ico;*.emf;*.wmf)|*.bmp;*.ico;*.emf;*.wmf|Bitmaps (*' +
- '.bmp)|*.bmp|Icons (*.ico)|*.ico|Enhanced Metafiles (*.emf)|*.emf' +
- '|Metafiles (*.wmf)|*.wmf'
- Left = 480
- Top = 160
- end
- end
-