home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Planet Source Code Jumbo …e CD Visual Basic 1 to 7
/
5_2007-2008.ISO
/
data
/
Zips
/
Integrate_2056313262007.psc
/
ppgImages.pag
< prev
Wrap
Text File
|
2007-03-25
|
17KB
|
509 lines
VERSION 5.00
Begin VB.PropertyPage ppgImages
AutoRedraw = -1 'True
Caption = "Images"
ClientHeight = 5460
ClientLeft = 0
ClientTop = 0
ClientWidth = 5790
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
PaletteMode = 0 'Halftone
ScaleHeight = 5460
ScaleWidth = 5790
Begin VB.Frame fraBrowse
Caption = "Add From System IML"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 735
Left = 45
TabIndex = 25
Top = 2970
Width = 5685
Begin VB.CommandButton cmdFile
Caption = "Add"
Height = 285
Index = 1
Left = 4590
TabIndex = 49
Top = 315
Width = 825
End
Begin VB.CommandButton cmdFile
Caption = "Browse"
Height = 285
Index = 0
Left = 3150
TabIndex = 48
Top = 315
Width = 825
End
Begin VB.TextBox txtFile
Height = 285
Left = 585
TabIndex = 46
Top = 315
Width = 2445
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "File:"
Height = 195
Left = 225
TabIndex = 47
Top = 360
Width = 300
End
End
Begin VB.Frame Frame2
Caption = "Color Depth"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2130
Left = 4275
TabIndex = 24
Top = 0
Width = 1410
Begin VB.PictureBox Picture1
BorderStyle = 0 'None
Height = 1815
Left = 45
ScaleHeight = 1815
ScaleWidth = 1275
TabIndex = 26
Top = 225
Width = 1275
Begin VB.OptionButton optClrDpth
Caption = "16 Colors"
Height = 195
Index = 0
Left = 45
TabIndex = 31
Top = 45
Width = 1005
End
Begin VB.OptionButton optClrDpth
Caption = "256 Colors"
Height = 195
Index = 1
Left = 45
TabIndex = 30
Top = 315
Width = 1095
End
Begin VB.OptionButton optClrDpth
Caption = "65k colors"
Height = 195
Index = 2
Left = 45
TabIndex = 29
Top = 585
Width = 1050
End
Begin VB.OptionButton optClrDpth
Caption = "True Color"
Height = 195
Index = 3
Left = 45
TabIndex = 28
Top = 855
Value = -1 'True
Width = 1050
End
Begin VB.OptionButton optClrDpth
Caption = "32 bit"
Height = 195
Index = 4
Left = 45
TabIndex = 27
Top = 1125
Width = 1050
End
End
End
Begin VB.Frame Frame1
Caption = "Size"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2130
Left = 2475
TabIndex = 23
Top = 0
Width = 1680
Begin VB.PictureBox Picture2
BorderStyle = 0 'None
Height = 1905
Left = 90
ScaleHeight = 1905
ScaleWidth = 1500
TabIndex = 32
Top = 180
Width = 1500
Begin VB.TextBox txtIconSize
Height = 240
Index = 1
Left = 945
TabIndex = 40
Top = 1620
Width = 390
End
Begin VB.TextBox txtIconSize
Height = 240
Index = 0
Left = 225
TabIndex = 39
Top = 1620
Width = 390
End
Begin VB.OptionButton optSize
Caption = "16 x 16"
Height = 195
Index = 0
Left = 45
TabIndex = 38
Top = 45
Value = -1 'True
Width = 915
End
Begin VB.OptionButton optSize
Caption = "24 x 24"
Height = 195
Index = 1
Left = 45
TabIndex = 37
Top = 315
Width = 1005
End
Begin VB.OptionButton optSize
Caption = "32 x 32"
Height = 195
Index = 2
Left = 45
TabIndex = 36
Top = 585
Width = 1005
End
Begin VB.OptionButton optSize
Caption = "48 x 48"
Height = 195
Index = 3
Left = 45
TabIndex = 35
Top = 855
Width = 1005
End
Begin VB.OptionButton optSize
Caption = "72 x 72"
Height = 240
Index = 4
Left = 45
TabIndex = 34
Top = 1125
Width = 1005
End
Begin VB.OptionButton optSize
Caption = "Custom:"
Height = 195
Index = 5
Left = 45
TabIndex = 33
Top = 1395
Width = 915
End
Begin VB.Label lblX
AutoSize = -1 'True
Caption = "&X"
Height = 195
Left = 90
TabIndex = 42
Top = 1620
Width = 90
End
Begin VB.Label lblY
AutoSize = -1 'True
Caption = "&Y"
Height = 195
Left = 810
TabIndex = 41
Top = 1620
Width = 90
End
End
End
Begin VB.Frame fraTransparentColour
Caption = "Transparency"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2145
Left = 60
TabIndex = 0
Top = 0
Width = 2325
Begin VB.PictureBox Picture3
BorderStyle = 0 'None
Height = 510
Left = 45
ScaleHeight = 510
ScaleWidth = 2175
TabIndex = 43
Top = 225
Width = 2175
Begin VB.OptionButton optTransparentColour
Caption = "&Auto Set Color"
Height = 255
Index = 0
Left = 45
TabIndex = 45
Top = 0
Value = -1 'True
Width = 1470
End
Begin VB.OptionButton optTransparentColour
Caption = "Use Co&lour:"
Height = 195
Index = 1
Left = 45
TabIndex = 44
Top = 270
Width = 1290
End
End
Begin VB.CommandButton cmdPickColour
Caption = "&Select"
Height = 255
Left = 1260
TabIndex = 8
ToolTipText = "Choose Transparent Colour"
Top = 1755
Width = 765
End
Begin VB.TextBox txtRGB
Height = 315
Index = 2
Left = 720
TabIndex = 6
Text = "255"
Top = 1365
Width = 435
End
Begin VB.TextBox txtRGB
Height = 315
Index = 1
Left = 720
TabIndex = 4
Text = "255"
Top = 1065
Width = 435
End
Begin VB.TextBox txtRGB
Height = 315
Index = 0
Left = 720
TabIndex = 2
Text = "0"
Top = 765
Width = 435
End
Begin VB.Label lblColor
BorderStyle = 1 'Fixed Single
Height = 915
Left = 1260
TabIndex = 7
Top = 765
Width = 750
End
Begin VB.Label lblRGB
Caption = "&Blue:"
Height = 195
Index = 2
Left = 165
TabIndex = 5
Top = 1425
Width = 555
End
Begin VB.Label lblRGB
Caption = "&Green:"
Height = 195
Index = 1
Left = 165
TabIndex = 3
Top = 1125
Width = 555
End
Begin VB.Label lblRGB
Caption = "Re&d:"
Height = 195
Index = 0
Left = 165
TabIndex = 1
Top = 825
Width = 495
End
End
Begin VB.CommandButton cmdMoveUp
Caption = ">>"
Height = 315
Left = 3420
TabIndex = 20
ToolTipText = "Move Selected Image Forward"
Top = 4935
Width = 1035
End
Begin VB.CommandButton cmdMoveDown
Caption = "<<"
Height = 315
Left = 2340
TabIndex = 19
ToolTipText = "Move Selected Image Back"
Top = 4935
Width = 1035
End
Begin VB.HScrollBar hscScroll
Height = 195
Left = 90
TabIndex = 16
TabStop = 0 'False
Top = 4515
Width = 5610
End
Begin VB.CommandButton cmdClear
Caption = "&Clear..."
Height = 315
Left = 4680
TabIndex = 21
ToolTipText = "Clear the Image List"
Top = 4935
Width = 1035
End
Begin VB.CommandButton cmdRemove
Caption = "&Remove"
Height = 315
Left = 1200
TabIndex = 18
ToolTipText = "Remove Selected Image"
Top = 4935
Width = 1035
End
Begin VB.CommandButton cmdAdd
Caption = "&Add"
Height = 315
Left = 120
TabIndex = 17
ToolTipText = "Add One or More Images"
Top = 4935
Width = 1035
End
Begin VB.Frame fraCurrent
Caption = "Keys"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 780
Left = 60
TabIndex = 9
Top = 2160
Width = 5655
Begin VB.CheckBox chkSetKeys
Caption = "&Set Keys from Filename(s)"
Height = 195
Left = 3240
TabIndex = 22
Top = 450
Width = 2235
End
Begin VB.CommandButton cmdNext
Appearance = 0 'Flat
Caption = "4"
BeginProperty Font
dex = 38
3240
Left ( EndProd h
End
d h P5
iIae Forward"
Top n = 4935
Width 195
n Top 0"5
Charse More V
Y dth Left .CommandButtlu4( End e2t S VB.CheckBox chkSetKeyRp 0"5
Charse Mou
d h P5 = "&Cl ft IN
End
d Widt
tIaptiB Caption = L hFrame fraBrowsEA
ED9Hec8 non = L n > 'A hFrame f
Width = = "16 x 16"
TabIndexV = Weight s:765
meal720
2
= 0 'Faco5 = L n uton cmdClear
Ca uton cmw Caption = e5655eighh0 'Fe;Ho"H3 = "&L S oIhh0 'Fe; 'False
3 = "&L S oIhh0 'Fe; 'False
3 = "&
TabIndex : TabIndexV dex : TabIndexV e7 "1
Begin VB n uton cmdClh0 'Fe; 'False
3 = "&L S oIhh0x6o 195
n Tr14eft .CommandButtluVTr14eft .CommancmdClear uVTr14eft .CommancmoIhh0 'Fe; 'FalT .CommancmoIhh0 'Fe; 'FalT Charse MtCheckBpl Ch5
TabIndex : Charse5
se ADohh0 'Fe; p Charton cmdClh0 '(x ) = "TahomaM5'(x ) = "TarowsEA
ED9Hec8 non = L n > 'A hFrame f
Width = = "16 x 16"
fOd7idth = = 16"
fOd7idth = = 16"
fOd7idth = = 16"
fOd7idth = =s)
fOd7idthFalse
3 = = "16 x 16"
7idth = =s) at) 7idth = =s)b at) 7idth = "16 b at_h = = 16"
fOd7idthDIGame f
Width = = "16 x 16"Mou
d h P5 c/AN3rFe; 'FalT 7'
d h P5 AalT 7'
d h =lidth = = 16"
fOd7idth th = "
fOd7idth = = th = ) 7id6"
fOd7idthDIGame f
epPBCommancmoIhh =s)b AAAA:
fO ) 7id6 = = oa