📄 frmmain.frm
字号:
VERSION 5.00
Object = "{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.3#0"; "comctl32.ocx"
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
Begin VB.MDIForm frmMain
BackColor = &H8000000C&
Caption = "DataMonkey"
ClientHeight = 4224
ClientLeft = 132
ClientTop = 708
ClientWidth = 5544
Icon = "frmMain.frx":0000
LinkTopic = "MDIForm1"
StartUpPosition = 3 'Windows Default
Begin ComctlLib.Toolbar tbToolBar
Align = 1 'Align Top
Height = 396
Left = 0
TabIndex = 1
Top = 0
Width = 5544
_ExtentX = 9779
_ExtentY = 699
ButtonWidth = 635
ButtonHeight = 582
ImageList = "imlIcons"
_Version = 327682
BeginProperty Buttons {0713E452-850A-101B-AFC0-4210102A8DA7}
NumButtons = 11
BeginProperty Button1 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = "New"
Object.ToolTipText = "1034"
Object.Tag = ""
ImageKey = "New"
EndProperty
BeginProperty Button2 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = "Open"
Object.ToolTipText = "1035"
Object.Tag = ""
ImageKey = "Open"
EndProperty
BeginProperty Button3 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = "Save"
Object.ToolTipText = "1036"
Object.Tag = ""
ImageKey = "Save"
EndProperty
BeginProperty Button4 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = ""
Object.Tag = ""
Style = 3
MixedState = -1 'True
EndProperty
BeginProperty Button5 {0713F354-850A-101B-AFC0-4210102A8DA7}
Object.Visible = 0 'False
Key = "Print"
Object.ToolTipText = "1037"
Object.Tag = ""
ImageKey = "Print"
EndProperty
BeginProperty Button6 {0713F354-850A-101B-AFC0-4210102A8DA7}
Object.Visible = 0 'False
Key = ""
Object.Tag = ""
Style = 3
MixedState = -1 'True
EndProperty
BeginProperty Button7 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = "Cut"
Object.ToolTipText = "1038"
Object.Tag = ""
ImageKey = "Cut"
EndProperty
BeginProperty Button8 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = "Copy"
Object.ToolTipText = "1039"
Object.Tag = ""
ImageKey = "Copy"
EndProperty
BeginProperty Button9 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = "Paste"
Object.ToolTipText = "1040"
Object.Tag = ""
ImageKey = "Paste"
EndProperty
BeginProperty Button10 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = ""
Object.Tag = ""
Style = 3
MixedState = -1 'True
EndProperty
BeginProperty Button11 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = "Exclamation"
Object.ToolTipText = "Run Import"
Object.Tag = ""
ImageKey = "Exclamation"
EndProperty
EndProperty
BorderStyle = 1
End
Begin ComctlLib.StatusBar sbStatusBar
Align = 2 'Align Bottom
Height = 276
Left = 0
TabIndex = 0
Top = 3948
Width = 5544
_ExtentX = 9779
_ExtentY = 487
SimpleText = ""
_Version = 327682
BeginProperty Panels {0713E89E-850A-101B-AFC0-4210102A8DA7}
NumPanels = 3
BeginProperty Panel1 {0713E89F-850A-101B-AFC0-4210102A8DA7}
AutoSize = 1
Object.Width = 4170
Text = "Status"
TextSave = "Status"
Key = ""
Object.Tag = ""
EndProperty
BeginProperty Panel2 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Style = 6
AutoSize = 2
TextSave = "7/16/2002"
Key = ""
Object.Tag = ""
EndProperty
BeginProperty Panel3 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Style = 5
AutoSize = 2
TextSave = "7:11 PM"
Key = ""
Object.Tag = ""
EndProperty
EndProperty
End
Begin MSComDlg.CommonDialog dlgCommonDialog
Left = 4680
Top = 2220
_ExtentX = 847
_ExtentY = 847
_Version = 393216
CancelError = -1 'True
End
Begin MSComDlg.CommonDialog dlgTemplateDialog
Left = 4680
Top = 2820
_ExtentX = 847
_ExtentY = 847
_Version = 393216
CancelError = -1 'True
End
Begin MSComDlg.CommonDialog dlgTextDialog
Left = 4080
Top = 2820
_ExtentX = 847
_ExtentY = 847
_Version = 393216
CancelError = -1 'True
End
Begin ComctlLib.ImageList imlIcons
Left = 4560
Top = 1320
_ExtentX = 995
_ExtentY = 995
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 327682
BeginProperty Images {0713E8C2-850A-101B-AFC0-4210102A8DA7}
NumListImages = 14
BeginProperty ListImage1 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":0442
Key = "New"
EndProperty
BeginProperty ListImage2 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":0554
Key = "Open"
EndProperty
BeginProperty ListImage3 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":0666
Key = "Save"
EndProperty
BeginProperty ListImage4 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":0778
Key = "Print"
EndProperty
BeginProperty ListImage5 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":088A
Key = "Cut"
EndProperty
BeginProperty ListImage6 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":099C
Key = "Copy"
EndProperty
BeginProperty ListImage7 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":0AAE
Key = "Paste"
EndProperty
BeginProperty ListImage8 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":0BC0
Key = ""
EndProperty
BeginProperty ListImage9 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":0CD2
Key = ""
EndProperty
BeginProperty ListImage10 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":0DE4
Key = ""
EndProperty
BeginProperty ListImage11 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":0EF6
Key = ""
EndProperty
BeginProperty ListImage12 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":1008
Key = ""
EndProperty
BeginProperty ListImage13 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":111A
Key = ""
EndProperty
BeginProperty ListImage14 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMain.frx":122C
Key = "Exclamation"
EndProperty
EndProperty
End
Begin VB.Menu mnuFile
Caption = "1000"
Begin VB.Menu mnuFileNew
Caption = "New Project..."
End
Begin VB.Menu mnuFileOpen
Caption = "1002"
Shortcut = ^O
End
Begin VB.Menu mnuFileClose
Caption = "1003"
End
Begin VB.Menu mnuFileBar1
Caption = "-"
End
Begin VB.Menu mnuFileSave
Caption = "1004"
Shortcut = ^S
End
Begin VB.Menu mnuFileSaveAs
Caption = "1005"
End
Begin VB.Menu mnuFileCreateTemplate
Caption = "&Create Template File..."
End
Begin VB.Menu mnuFileBar2
Caption = "-"
End
Begin VB.Menu mnuFileMRU
Caption = ""
Index = 0
Visible = 0 'False
End
Begin VB.Menu mnuFileMRU
Caption = ""
Index = 1
Visible = 0 'False
End
Begin VB.Menu mnuFileMRU
Caption = ""
Index = 2
Visible = 0 'False
End
Begin VB.Menu mnuFileMRU
Caption = ""
Index = 3
Visible = 0 'False
End
Begin VB.Menu mnuFileBar6
Caption = "-"
Visible = 0 'False
End
Begin VB.Menu mnuFileExit
Caption = "1012"
End
End
Begin VB.Menu mnuEdit
Caption = "1013"
Begin VB.Menu mnuEditUndo
Caption = "1014"
Shortcut = ^Z
End
Begin VB.Menu mnuEditBar1
Caption = "-"
End
Begin VB.Menu mnuEditCut
Caption = "1015"
Shortcut = ^X
End
Begin VB.Menu mnuEditCopy
Caption = "1016"
Shortcut = ^C
End
Begin VB.Menu mnuEditPaste
Caption = "1017"
Shortcut = ^V
End
End
Begin VB.Menu mnuView
Caption = "1019"
Begin VB.Menu mnuViewToolbar
Caption = "1020"
Checked = -1 'True
End
Begin VB.Menu mnuViewStatusBar
Caption = "1021"
Checked = -1 'True
End
Begin VB.Menu mnuViewBar2
Caption = "-"
End
Begin VB.Menu mnuViewOptions
Caption = "1023"
Visible = 0 'False
End
Begin VB.Menu mnuViewBar3
Caption = "-"
End
Begin VB.Menu mnuViewProjectWindow
Caption = "Project Window"
Checked = -1 'True
End
End
Begin VB.Menu mnuTools
Caption = "&Tools"
Begin VB.Menu mnuDbSchema
Caption = "&Output Schema"
Begin VB.Menu mnuAddOutputSource
Caption = "Add &New..."
End
Begin VB.Menu mnuImportSchema
Caption = "&Import DB Schema..."
End
Begin VB.Menu mnuEditOutputSource
Caption = "&Edit..."
End
End
Begin VB.Menu mnuRelationshipWindow
Caption = "&Edit Relationships..."
End
Begin VB.Menu mnuAddCheckpoints
Caption = "Edit &Input Schema..."
End
End
Begin VB.Menu mnuRun
Caption = "&Run"
Begin VB.Menu mnuRunImport
Caption = "&Import"
End
End
Begin VB.Menu mnuWindow
Caption = "1024"
WindowList = -1 'True
Begin VB.Menu mnuWindowCascade
Caption = "1026"
End
Begin VB.Menu mnuWindowTileHorizontal
Caption = "1027"
End
Begin VB.Menu mnuWindowTileVertical
Caption = "1028"
End
End
Begin VB.Menu mnuHelp
Caption = "1030"
Begin VB.Menu mnuHelpContents
Caption = "1031"
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -