📄 frmmain.frm
字号:
Begin VB.Data DataCategories
Caption = "DataCategories"
Connect = "Access"
DatabaseName = ""
DefaultCursorType= 0 '缺省游标
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
BeginProperty Font
Name = "Verdana"
Size = 6.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 420
Left = 75
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = ""
Top = 8655
Visible = 0 'False
Width = 2355
End
Begin VB.Frame frameCommands
BorderStyle = 0 'None
BeginProperty Font
Name = "Verdana"
Size = 6.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 120
TabIndex = 4
Top = 15
Width = 10245
Begin MSComctlLib.Toolbar Commands
Height = 330
Left = 0
TabIndex = 5
Top = 0
Width = 5205
_ExtentX = 9181
_ExtentY = 582
ButtonWidth = 609
ButtonHeight = 582
AllowCustomize = 0 'False
Style = 1
ImageList = "Icons"
DisabledImageList= "Icons_disabled"
_Version = 393216
BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628}
NumButtons = 19
BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "Set_DB"
Object.ToolTipText = "选择数据库"
ImageIndex = 19
EndProperty
BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "Add_Cat"
Object.ToolTipText = "添加文件夹"
ImageIndex = 1
EndProperty
BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "Add_SubCat"
Object.ToolTipText = "添加子文件夹"
ImageIndex = 2
EndProperty
BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "Ren_Cat"
Object.ToolTipText = "重命名文件夹"
ImageIndex = 3
EndProperty
BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "Del_Cat"
Object.ToolTipText = "删除文件夹"
ImageIndex = 4
EndProperty
BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628}
Enabled = 0 'False
Key = "Add_Pict"
Object.ToolTipText = "添加图片"
ImageIndex = 8
EndProperty
BeginProperty Button9 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button10 {66833FEA-8583-11D1-B16A-00C0F0283628}
Enabled = 0 'False
Key = "Full"
Object.ToolTipText = "全屏"
ImageIndex = 9
EndProperty
BeginProperty Button11 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button12 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "Previous"
Object.ToolTipText = "上一张"
ImageIndex = 10
EndProperty
BeginProperty Button13 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "Next"
Object.ToolTipText = "下一张"
ImageIndex = 12
EndProperty
BeginProperty Button14 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button15 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "Play"
Object.ToolTipText = "开始"
ImageIndex = 11
Style = 2
EndProperty
BeginProperty Button16 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "Pause"
Object.ToolTipText = "暂停"
ImageIndex = 13
Style = 2
Value = 1
EndProperty
BeginProperty Button17 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button18 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "First"
Object.ToolTipText = "第一页"
ImageIndex = 14
EndProperty
BeginProperty Button19 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "Last"
Object.ToolTipText = "最后一页"
ImageIndex = 15
EndProperty
EndProperty
End
Begin Thumb_DB.ucGraphicButton btnAboutMe
Height = 180
Left = 9480
ToolTipText = "关于我们..."
Top = 75
Width = 240
_ExtentX = 423
_ExtentY = 318
Color = 1
End
Begin Thumb_DB.ucGraphicButton btnHelp
Height = 180
Left = 9180
ToolTipText = "快速帮助..."
Top = 75
Width = 240
_ExtentX = 423
_ExtentY = 318
Color = 1
End
Begin MSComctlLib.Toolbar CommandExit
Height = 330
Left = 9765
TabIndex = 24
Top = 0
Width = 465
_ExtentX = 820
_ExtentY = 582
ButtonWidth = 609
ButtonHeight = 582
AllowCustomize = 0 'False
Wrappable = 0 'False
Style = 1
ImageList = "Icons"
_Version = 393216
BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628}
NumButtons = 3
BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "Exit"
Object.ToolTipText = "Quit Thumb DB"
ImageIndex = 16
EndProperty
BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628}
EndProperty
EndProperty
End
End
Begin MSComctlLib.ImageList Icons
Left = 165
Top = 3255
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 19
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":1E70
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":1FD0
Key = ""
EndProperty
BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":212C
Key = ""
EndProperty
BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":2288
Key = ""
EndProperty
BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":23E4
Key = ""
EndProperty
BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":2540
Key = ""
EndProperty
BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":26A0
Key = ""
EndProperty
BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":27FC
Key = ""
EndProperty
BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":2958
Key = ""
EndProperty
BeginProperty ListImage10 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":2AB4
Key = ""
EndProperty
BeginProperty ListImage11 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":2C10
Key = ""
EndProperty
BeginProperty ListImage12 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":2D74
Key = ""
EndProperty
BeginProperty ListImage13 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":2ED0
Key = ""
EndProperty
BeginProperty ListImage14 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":3034
Key = ""
EndProperty
BeginProperty ListImage15 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":3190
Key = ""
EndProperty
BeginProperty ListImage16 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":32EC
Key = ""
EndProperty
BeginProperty ListImage17 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":3450
Key = ""
EndProperty
BeginProperty ListImage18 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":35B0
Key = ""
EndProperty
BeginProperty ListImage19 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmMain.frx":3710
Key = ""
EndProperty
EndProperty
End
Begin VB.Data DataPictures
Caption = "DataPictures"
Connect = "Access"
DatabaseName = ""
DefaultCursorType= 0 '缺省游标
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
BeginProperty Font
Name = "Verdana"
Size = 6.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 420
Left = 2415
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = ""
Top = 8655
Visible = 0 'False
Width = 2355
End
Begin VB.PictureBox ThumbGridBack
Appearance = 0 'Flat
BackColor = &H00808080&
ClipControls = 0 'False
BeginProperty Font
Name = "Verdana"
Size = 6.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 6945
Left = 4200
ScaleHeight = 461
ScaleMode = 3 'Pixel
ScaleWidth = 410
TabIndex = 7
TabStop = 0 'False
Top = 1050
Width = 6180
Begin VB.VScrollBar vsbFullGrid
Height = 6930
LargeChange = 7
Left = 5940
Max = 0
TabIndex = 12
TabStop = 0 'False
Top = 0
Visible = 0 'False
Width = 225
End
Begin MSFlexGridLib.MSFlexGrid FullGrid
Height = 960
Left = -15
TabIndex = 0
Top = -15
Visible = 0 'False
Width = 6750
_ExtentX = 11906
_ExtentY = 1693
_Version = 393216
Rows = 8
Cols = 5
FixedCols = 0
RowHeightMin = 990
BackColor = 8421504
ForeColor = 65280
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -