home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1998 June A
/
Pcwk6A98.iso
/
Share95
/
Tvstudio
/
_SETUP.1
/
PStudio.exe
/
0
/
RCDATA
/
TSHAPEFORM
/
TSHAPEFORM.txt
Wrap
Text File
|
1998-04-01
|
7KB
|
280 lines
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