home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Planet Source Code Jumbo …e CD Visual Basic 1 to 7
/
5_2007-2008.ISO
/
data
/
Zips
/
RegEdit_2_2049892242007.psc
/
RegEdit
/
frmEditBIN.frm
< prev
Wrap
Text File
|
2006-09-03
|
7KB
|
223 lines
VERSION 5.00
Object = "{3B7C8863-D78F-101B-B9B5-04021C009402}#1.2#0"; "RICHTX32.OCX"
Object = "{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0"; "FM20.DLL"
Begin VB.Form frmEditBIN
BorderStyle = 3 'Fixed Dialog
Caption = "Edit Binary Value"
ClientHeight = 4335
ClientLeft = 1050
ClientTop = 1335
ClientWidth = 5355
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Icon = "frmEditBIN.frx":0000
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 289
ScaleMode = 3 'Pixel
ScaleWidth = 357
ShowInTaskbar = 0 'False
WhatsThisButton = -1 'True
WhatsThisHelp = -1 'True
Begin VB.TextBox txtType
Alignment = 2 'Center
Appearance = 0 'Flat
Height = 285
Left = 5055
TabIndex = 10
Top = 690
Visible = 0 'False
Width = 210
End
Begin VB.TextBox txtName
BackColor = &H8000000F&
Height = 315
Left = 90
Locked = -1 'True
TabIndex = 8
Top = 360
Width = 5175
End
Begin VB.CommandButton cmdCancel
Cancel = -1 'True
Caption = "Cancel"
Height = 360
Left = 4170
TabIndex = 5
Top = 3900
Width = 1095
End
Begin VB.CommandButton cmdOK
Caption = "OK"
Default = -1 'True
Height = 360
Left = 2955
TabIndex = 4
Top = 3900
Width = 1095
End
Begin VB.PictureBox picRTFBase
BackColor = &H80000009&
Height = 2790
Left = 90
ScaleHeight = 182
ScaleMode = 3 'Pixel
ScaleWidth = 341
TabIndex = 0
Top = 990
Width = 5175
Begin RichTextLib.RichTextBox RTFLine
Height = 2730
Left = 0
TabIndex = 3
Top = 0
Width = 615
_ExtentX = 1085
_ExtentY = 4815
_Version = 393217
BorderStyle = 0
HideSelection = 0 'False
ReadOnly = -1 'True
Appearance = 0
TextRTF = $"frmEditBIN.frx":014A
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin RichTextLib.RichTextBox RTFAscii
Height = 2730
Left = 3710
TabIndex = 1
Top = 0
Width = 1005
_ExtentX = 1773
_ExtentY = 4815
_Version = 393217
BorderStyle = 0
Enabled = -1 'True
HideSelection = 0 'False
Appearance = 0
TextRTF = $"frmEditBIN.frx":01FB
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin RichTextLib.RichTextBox RTFHex
Height = 2730
Left = 735
TabIndex = 2
Top = 0
Width = 2805
_ExtentX = 4948
_ExtentY = 4815
_Version = 393217
BorderStyle = 0
Enabled = -1 'True
HideSelection = 0 'False
Appearance = 0
TextRTF = $"frmEditBIN.frx":02E4
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin MSForms.ScrollBar sbScroll
Height = 2730
Left = 4860
TabIndex = 11
Top = 0
Visible = 0 'False
Width = 255
ForeColor = 16711680
Size = "450;4815"
End
End
Begin VB.Label lblPath
BackStyle = 0 'Transparent
Height = 210
Left = 1020
TabIndex = 9
Top = 735
Visible = 0 'False
Width = 3990
End
Begin VB.Label lblData
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "Value data :"
Height = 195
Left = 105
TabIndex = 7
Top = 735
Width = 870
End
Begin VB.Label lblName
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "Value name :"
Height = 195
Left = 105
TabIndex = 6
Top = 120
Width = 930
End
Begin VB.Menu mnuEditBase
Caption = "Edit Base"
Visible = 0 'False
Begin VB.Menu mnuEdit
Caption = "Cut"
Index = 0
End
Begin VB.Menu mnuEdit
Caption = "Copy"
Index = 1
End
Begin VB.Menu mnuEdit
Caption = "Paste"
Index = 2
End
Begin VB.Menu mnuEdit
Caption = "Delete"
Index = 3
End
Begin VB.Menu mnuEdit
Caption = "-"
Index = 4
End
Begin VB.Menu mnuEdit
Caption = "Select All = 2
End
Begin VB.lete"
IndH8
TabIndexl = 2
x Height = 195
lpti8n9
End Name End it E =O -1 'True
E y)ertpslVB.Menu mnuEdit
0
Begin VB.MEditlxg3)Begin VB0
Begit