📄 dgp.frm
字号:
BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolGoUp"
Description = "Go up"
Object.ToolTipText = "上转"
ImageIndex = 1
Style = 2
EndProperty
BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolStop"
Description = "Stop"
Object.ToolTipText = "停转"
ImageIndex = 2
Style = 2
Value = 1
EndProperty
BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolGoDown"
Description = "Go Down"
Object.ToolTipText = "下转"
ImageIndex = 3
Style = 2
EndProperty
BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "tool2SpeeIncr"
Description = "Speed Increment"
Object.ToolTipText = "速度增加"
ImageIndex = 4
EndProperty
BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "tool2SpeeDec"
Description = "Speed Decrement"
Object.ToolTipText = "速度减小"
ImageIndex = 5
EndProperty
BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "tool2MaxSpee"
Description = "Max speed"
Object.ToolTipText = "最高速度"
ImageIndex = 6
EndProperty
BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "tool2MinSpee"
Description = "Min Speed"
Object.ToolTipText = "最小速度"
ImageIndex = 7
EndProperty
BeginProperty Button9 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button10 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolToObjeAngl"
Description = "ToObjectAngle"
Object.ToolTipText = "转到指定角"
ImageIndex = 8
EndProperty
BeginProperty Button11 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolToZero"
Description = "ToZero"
Object.ToolTipText = "归零"
ImageIndex = 9
EndProperty
EndProperty
End
Begin VB.Label Label5
Caption = "目标角度(度)："
Height = 255
Left = 2040
TabIndex = 34
Top = 1680
Width = 1335
End
Begin VB.Label Label4
Caption = "转速设置(d/S)："
Height = 255
Left = 2040
TabIndex = 33
Top = 2160
Width = 1455
End
Begin VB.Label Label3
Caption = "当前角度(度)："
Height = 375
Left = 2040
TabIndex = 32
Top = 1080
Width = 1455
End
End
Begin VB.Frame frmFangWei
Caption = "方位控制"
Height = 3135
Left = 120
TabIndex = 7
Top = 600
Width = 4695
Begin VB.TextBox txtSpinNumb
Height = 270
Left = 3480
TabIndex = 59
Text = "0"
Top = 2640
Width = 855
End
Begin VB.TextBox txtCrntAzimSpinSpee
Height = 270
Left = 3480
TabIndex = 20
Text = "125"
Top = 2280
Width = 855
End
Begin VB.TextBox txtAzimObjeAngl
Height = 270
Left = 3480
TabIndex = 18
Text = "0"
Top = 1920
Width = 855
End
Begin VB.TextBox txtSweeEndAngl
Height = 270
Left = 3480
TabIndex = 13
Text = "0"
Top = 1560
Width = 855
End
Begin VB.TextBox txtSweeBegeAngl
Height = 270
Left = 3480
TabIndex = 12
Text = "0"
Top = 1200
Width = 855
End
Begin VB.TextBox txtCrntAzimAngl
Height = 270
Left = 3480
TabIndex = 11
Text = "0"
Top = 840
Width = 855
End
Begin VB.PictureBox Picture1
Height = 1815
Left = 120
ScaleHeight = 1755
ScaleWidth = 1635
TabIndex = 10
Top = 840
Width = 1695
Begin VB.Line AzimPole
BorderColor = &H000000FF&
BorderWidth = 10
X1 = 840
X2 = 120
Y1 = 840
Y2 = 840
End
End
Begin MSComctlLib.ImageList ImageList1
Left = 2760
Top = 1320
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 12
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":25AA
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":29FC
Key = ""
EndProperty
BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":2E4E
Key = ""
EndProperty
BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":32A0
Key = ""
EndProperty
BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":36F2
Key = ""
EndProperty
BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":3B44
Key = ""
EndProperty
BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":3F96
Key = ""
EndProperty
BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":43E8
Key = ""
EndProperty
BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":483A
Key = ""
EndProperty
BeginProperty ListImage10 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":4B54
Key = ""
EndProperty
BeginProperty ListImage11 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":4FA6
Key = ""
EndProperty
BeginProperty ListImage12 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "DGP.frx":53F8
Key = ""
EndProperty
EndProperty
End
Begin MSComctlLib.Toolbar Toolbar1
Height = 390
Left = 120
TabIndex = 9
Top = 240
Width = 4455
_ExtentX = 7858
_ExtentY = 688
ButtonWidth = 609
ButtonHeight = 582
Appearance = 1
ImageList = "ImageList1"
HotImageList = "ImageList1"
_Version = 393216
BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628}
NumButtons = 14
BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolTurnLeft"
Description = "UntiClockWise"
Object.ToolTipText = "逆时针转"
ImageIndex = 1
Style = 2
EndProperty
BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolStopRotate"
Description = "StopRotate"
Object.ToolTipText = "停转"
ImageIndex = 2
Style = 2
Value = 1
EndProperty
BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolClockWise"
Description = "ClockWise"
Object.ToolTipText = "顺时针转"
ImageIndex = 3
Style = 2
EndProperty
BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolAutoSpin"
Object.ToolTipText = "自动"
ImageIndex = 12
EndProperty
BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628}
ImageIndex = 4
Style = 3
EndProperty
BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolSpdInc"
Description = "Speed Increment"
Object.ToolTipText = "转速增加"
ImageIndex = 4
EndProperty
BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolSpdDec"
Description = "Speed decrement"
Object.ToolTipText = "转速降低"
ImageIndex = 5
EndProperty
BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolMaxSpd"
Description = "Max speed"
Object.ToolTipText = "最高转速"
ImageIndex = 6
EndProperty
BeginProperty Button9 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolMinSpd"
Description = "Mini speed"
Object.ToolTipText = "最小速度"
ImageIndex = 7
EndProperty
BeginProperty Button10 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button11 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolToObj"
Description = "Spin To Object"
Object.ToolTipText = "转到目标角"
ImageIndex = 8
EndProperty
BeginProperty Button12 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolAngleToZero"
Description = "Set Angle to Zero"
Object.ToolTipText = "角度置零"
ImageIndex = 9
EndProperty
BeginProperty Button13 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolSpdCal"
Description = "Spin speed cal"
Object.ToolTipText = "转速校准"
ImageIndex = 10
EndProperty
BeginProperty Button14 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "toolFanScan"
Description = "Fan scan"
Object.ToolTipText = "扇扫"
ImageIndex = 11
EndProperty
EndProperty
End
Begin VB.Label Label10
Caption = "圈数:"
Height = 255
Left = 2040
TabIndex = 60
Top = 2640
Width = 975
End
Begin VB.Label lblCurrspee
Caption = "当前速度："
Height = 255
Left = 2040
TabIndex = 19
Top = 2280
Width = 975
End
Begin VB.Label lblObjAngl
Caption = "目标角"
Height = 255
Left = 2040
TabIndex = 17
Top = 2040
Width = 855
End
Begin VB.Label lblFanEndAngl
Caption = "扇扫终止角"
Height = 255
Left = 2040
TabIndex = 16
Top = 1680
Width = 975
End
Begin VB.Label lblFanBegaAngl
Caption = "扇扫起始角"
Height = 255
Left = 2040
TabIndex = 15
Top = 1320
Width = 975
End
Begin VB.Label lblCurrAngl
Caption = "当前角度"
Height = 255
Left = 2040
TabIndex = 14
Top = 960
Width = 735
End
End
End
Begin MSCommLib.MSComm MSComm1
Left = 2760
Top = 0
_ExtentX = 1005
_ExtentY = 1005
_Version = 393216
DTREnable = 0 'False
Handshaking = 2
InBufferSize = 32700
InputLen = 1
OutBufferSize = 32700
RTSEnable = -1 'True
BaudRate = 115200
InputMode = 1
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -