home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1998 June A
/
Pcwk6A98.iso
/
Share95
/
Tvstudio
/
_SETUP.1
/
PStudio.exe
/
0
/
RCDATA
/
TBRUSHDLG1
/
TBRUSHDLG1.txt
Wrap
Text File
|
1998-04-01
|
12KB
|
593 lines
object brushdlg1: Tbrushdlg1
Left = 269
Top = 292
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsDialog
Caption = 'Pattern Maker'
ClientHeight = 218
ClientWidth = 294
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = 'System'
Font.Style = []
FormStyle = fsStayOnTop
OnActivate = FormCreate
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 16
object BiPict1: TImage
Left = 218
Top = 102
Width = 32
Height = 20
OnDblClick = BiPict1DblClick
end
object BiPict2: TImage
Left = 256
Top = 102
Width = 33
Height = 20
end
object BiPict3: TImage
Left = 218
Top = 128
Width = 8
Height = 8
AutoSize = True
end
object Bevel1: TBevel
Left = 219
Top = 141
Width = 40
Height = 40
end
object BiPict4: TImage
Left = 230
Top = 152
Width = 20
Height = 19
Hint = 'Load Pattern'
ParentShowHint = False
ShowHint = True
OnClick = BiPict4Click
end
object Shape1: TShape
Left = 8
Top = 8
Width = 25
Height = 25
OnMouseUp = Shape1MouseUp
end
object Shape2: TShape
Left = 32
Top = 8
Width = 25
Height = 25
OnMouseUp = Shape2MouseUp
end
object Shape3: TShape
Left = 56
Top = 8
Width = 25
Height = 25
OnMouseUp = Shape3MouseUp
end
object Shape4: TShape
Left = 80
Top = 8
Width = 25
Height = 25
OnMouseUp = Shape4MouseUp
end
object Shape5: TShape
Left = 104
Top = 8
Width = 25
Height = 25
OnMouseUp = Shape5MouseUp
end
object Shape6: TShape
Left = 128
Top = 8
Width = 25
Height = 25
OnMouseUp = Shape6MouseUp
end
object Shape7: TShape
Left = 152
Top = 8
Width = 25
Height = 25
OnMouseUp = Shape7MouseUp
end
object Shape8: TShape
Left = 176
Top = 8
Width = 25
Height = 25
OnMouseUp = Shape8MouseUp
end
object Shape9: TShape
Left = 8
Top = 32
Width = 25
Height = 25
OnMouseUp = Shape9MouseUp
end
object Shape10: TShape
Left = 32
Top = 32
Width = 25
Height = 25
OnMouseUp = Shape10MouseUp
end
object Shape11: TShape
Left = 56
Top = 32
Width = 25
Height = 25
OnMouseUp = Shape11MouseUp
end
object Shape12: TShape
Left = 80
Top = 32
Width = 25
Height = 25
OnMouseUp = Shape12MouseUp
end
object Shape13: TShape
Left = 104
Top = 32
Width = 25
Height = 25
OnMouseUp = Shape13MouseUp
end
object Shape14: TShape
Left = 128
Top = 32
Width = 25
Height = 25
OnMouseUp = Shape14MouseUp
end
object Shape15: TShape
Left = 152
Top = 32
Width = 25
Height = 25
OnMouseUp = Shape15MouseUp
end
object Shape16: TShape
Left = 176
Top = 32
Width = 25
Height = 25
OnMouseUp = Shape16MouseUp
end
object Shape17: TShape
Left = 8
Top = 56
Width = 25
Height = 25
OnMouseUp = Shape17MouseUp
end
object Shape18: TShape
Left = 32
Top = 56
Width = 25
Height = 25
OnMouseUp = Shape18MouseUp
end
object Shape19: TShape
Left = 56
Top = 56
Width = 25
Height = 25
OnMouseUp = Shape19MouseUp
end
object Shape20: TShape
Left = 80
Top = 56
Width = 25
Height = 25
OnMouseUp = Shape20MouseUp
end
object Shape21: TShape
Left = 104
Top = 56
Width = 25
Height = 25
OnMouseUp = Shape21MouseUp
end
object Shape22: TShape
Left = 128
Top = 56
Width = 25
Height = 25
OnMouseUp = Shape22MouseUp
end
object Shape23: TShape
Left = 152
Top = 56
Width = 25
Height = 25
OnMouseUp = Shape23MouseUp
end
object Shape24: TShape
Left = 176
Top = 56
Width = 25
Height = 25
OnMouseUp = Shape24MouseUp
end
object Shape25: TShape
Left = 8
Top = 80
Width = 25
Height = 25
OnMouseUp = Shape25MouseUp
end
object Shape26: TShape
Left = 32
Top = 80
Width = 25
Height = 25
OnMouseUp = Shape26MouseUp
end
object Shape27: TShape
Left = 56
Top = 80
Width = 25
Height = 25
OnMouseUp = Shape27MouseUp
end
object Shape28: TShape
Left = 80
Top = 80
Width = 25
Height = 25
OnMouseUp = Shape28MouseUp
end
object Shape29: TShape
Left = 104
Top = 80
Width = 25
Height = 25
OnMouseUp = Shape29MouseUp
end
object Shape30: TShape
Left = 128
Top = 80
Width = 25
Height = 25
OnMouseUp = Shape30MouseUp
end
object Shape31: TShape
Left = 152
Top = 80
Width = 25
Height = 25
OnMouseUp = Shape31MouseUp
end
object Shape32: TShape
Left = 176
Top = 80
Width = 25
Height = 25
OnMouseUp = Shape32MouseUp
end
object Shape33: TShape
Left = 8
Top = 104
Width = 25
Height = 25
OnMouseUp = Shape33MouseUp
end
object Shape34: TShape
Left = 32
Top = 104
Width = 25
Height = 25
OnMouseUp = Shape34MouseUp
end
object Shape35: TShape
Left = 56
Top = 104
Width = 25
Height = 25
OnMouseUp = Shape35MouseUp
end
object Shape36: TShape
Left = 80
Top = 104
Width = 25
Height = 25
OnMouseUp = Shape36MouseUp
end
object Shape37: TShape
Left = 104
Top = 104
Width = 25
Height = 25
OnMouseUp = Shape37MouseUp
end
object Shape38: TShape
Left = 128
Top = 104
Width = 25
Height = 25
OnMouseUp = Shape38MouseUp
end
object Shape39: TShape
Left = 152
Top = 104
Width = 25
Height = 25
OnMouseUp = Shape39MouseUp
end
object Shape40: TShape
Left = 176
Top = 104
Width = 25
Height = 25
OnMouseUp = Shape40MouseUp
end
object Shape41: TShape
Left = 8
Top = 128
Width = 25
Height = 25
OnMouseUp = Shape41MouseUp
end
object Shape42: TShape
Left = 32
Top = 128
Width = 25
Height = 25
OnMouseUp = Shape42MouseUp
end
object Shape43: TShape
Left = 56
Top = 128
Width = 25
Height = 25
OnMouseUp = Shape43MouseUp
end
object Shape44: TShape
Left = 80
Top = 128
Width = 25
Height = 25
OnMouseUp = Shape44MouseUp
end
object Shape45: TShape
Left = 104
Top = 128
Width = 25
Height = 25
OnMouseUp = Shape45MouseUp
end
object Shape46: TShape
Left = 128
Top = 128
Width = 25
Height = 25
OnMouseUp = Shape46MouseUp
end
object Shape47: TShape
Left = 152
Top = 128
Width = 25
Height = 25
OnMouseUp = Shape47MouseUp
end
object Shape48: TShape
Left = 176
Top = 128
Width = 25
Height = 25
OnMouseUp = Shape48MouseUp
end
object Shape49: TShape
Left = 8
Top = 152
Width = 25
Height = 25
OnMouseUp = Shape49MouseUp
end
object Shape50: TShape
Left = 32
Top = 152
Width = 25
Height = 25
OnMouseUp = Shape50MouseUp
end
object Shape51: TShape
Left = 56
Top = 152
Width = 25
Height = 25
OnMouseUp = Shape51MouseUp
end
object Shape52: TShape
Left = 80
Top = 152
Width = 25
Height = 25
OnMouseUp = Shape52MouseUp
end
object Shape53: TShape
Left = 104
Top = 152
Width = 25
Height = 25
OnMouseUp = Shape53MouseUp
end
object Shape54: TShape
Left = 128
Top = 152
Width = 25
Height = 25
OnMouseUp = Shape54MouseUp
end
object Shape55: TShape
Left = 152
Top = 152
Width = 25
Height = 25
OnMouseUp = Shape55MouseUp
end
object Shape56: TShape
Left = 176
Top = 152
Width = 25
Height = 25
OnMouseUp = Shape56MouseUp
end
object Shape57: TShape
Left = 8
Top = 176
Width = 25
Height = 25
OnMouseUp = Shape57MouseUp
end
object Shape58: TShape
Left = 32
Top = 176
Width = 25
Height = 25
OnMouseUp = Shape58MouseUp
end
object Shape59: TShape
Left = 56
Top = 176
Width = 25
Height = 25
OnMouseUp = Shape59MouseUp
end
object Shape60: TShape
Left = 80
Top = 176
Width = 25
Height = 25
OnMouseUp = Shape60MouseUp
end
object Shape61: TShape
Left = 104
Top = 176
Width = 25
Height = 25
OnMouseUp = Shape61MouseUp
end
object Shape62: TShape
Left = 128
Top = 176
Width = 25
Height = 25
OnMouseUp = Shape62MouseUp
end
object Shape63: TShape
Left = 152
Top = 176
Width = 25
Height = 25
OnMouseUp = Shape63MouseUp
end
object Shape64: TShape
Left = 176
Top = 176
Width = 25
Height = 25
OnMouseUp = Shape64MouseUp
end
object BitBtn1: TBitBtn
Left = 218
Top = 6
Width = 71
Height = 27
Hint = 'Replace Current Pattern'
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnClick = BitBtn1Click
Kind = bkOK
end
object BitBtn2: TBitBtn
Left = 218
Top = 38
Width = 71
Height = 27
TabOrder = 1
OnClick = BitBtn2Click
Kind = bkCancel
end
object BitBtn3: TBitBtn
Left = 218
Top = 70
Width = 71
Height = 27
Caption = 'Clear'
TabOrder = 2
OnClick = BitBtn3Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object BitBtn8: TBitBtn
Left = 262
Top = 147
Width = 24
Height = 24
Hint = 'Windows Palette'
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnClick = BitBtn8Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333333333333333333333333333333339993AAA3CCC
3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF339993AAA3CCC
3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF339993AAA3CCC
3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF339993AAA3CCC
3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF339993AAA3CCC
3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF339993AAA3CCC
3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF3333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object BitBtn4: TBitBtn
Left = 216
Top = 192
Width = 73
Height = 25
Caption = 'Load In'
TabOrder = 4
OnClick = BitBtn4Click
end
object ColorDialog1: TColorDialog
Ctl3D = True
Left = 344
Top = 128
end
object ColorDialog2: TColorDialog
Ctl3D = True
Left = 344
Top = 168
end
end